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Xn the home computer races, the Atari 130XE stands out as a price leader. But using underpowered Atari 
BASIC™ on this otherwise fine machine is Hke racing in the Indy 500 with half your cylinders missing. 

So don't get left at the starting line with only half an "engine." Change to the performance leader now! Buy 
BASIC XE from OSS, the only programming language designed especially for the Atari 130XE. 

Just look at what you get for one low sticker price: 



BEST MILEAGE: With over 60,000 more bytes 
for your programs, BASIC XE lets you use all the 
memory you paid for.* 

MORE HORSEPOWER: Run Atari BASIC pro- 
grams 2 to 6 times faster.* Even with its incredible 
power, BASIC XE is compatible with Atari BASIC. 

BETTER HANDLING: With auto line number- 
ing, renumbering, program cross referencing, 
English error messages, and more. 



CLASSIC DESIGN: Show off the sleek struc- 
tured style of your own programs when you use 
BASIC XE statements like PROCEDURE, 
IF.. .ELSE, and WHILE.. .ENDWHILE. 

FREE ACCESSORIES: Get over $100 worth of 
Atari BASIC options FREE when you buy BASIC 
XE: complete Player/Missile Graphics support, 
string arrays, DOS access, SORT commands, read- 
able listings... over 50 extras at no additional charge. 



If you're ready to step up to real performance. . .YOU need BASIC XE now! 
If you haven't written your first BASIC program. . .YOU need BASIC XE now! 
If you're already a real pro in BASIC . . . YOU need BASIC XE now! 
BASIC XE may well be the best buy any Atari owner ever made. 



CIRCLE #101 ON READER SERVICE CARD 
*Want to know more? Call or write for free brochure or ask your local dealer. 

Atari 130XE'" and Atari BASIC™ are U.S. registered trademarks of Atari Corporation. 
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EDITORIAL 



The last two issues, in lieu of editorials, 
have featured coverage of Comdex and 
Atari's surprise showing there, and Part 1 
of oui" Summer CES coverage (two weeks 
after the event, having beaten the lead time 
insensate via hot coffee and hair torn from 
the scalp of the managing editor; a few 
more computer shows, and I'll be up for the 
lead in The King and I). 

This issue. Art Leyenberger and Lee Pap- 
pas conclude our coverage of CES with a 
comprehensive look at the new software an- 
nounced for the current 8-bit line of Atari 
computers, the XEs. 

On the ST front, Tom Hudson has been 
developing a commercial-quality drawing 
program for Atari's 16-bit "wonder ma- 
chine." The program is a quantum leap 
above any drawing program for the XEs, 
has more functions than MacPaint and is 
in color, to boot! 

We hope to present a multi-part tutorial 
on the development of this program, out- 
lining Tom's usage of C, his familiarization 
witli the 68000 chip and Iris incorporation 
of GEM into the program. 

We've been keeping you informed on the 
ST, and, starting next month, ANALOG 
Computing will be featuring ST coverage 
in every issue: reviews of ST software and 
hardwai'e, sneak previews of new products, 
tutorials and, of coui'se, type-in programs. 
As we learn about the S'T, so shall you. 

The view from here. 

I don't know about you, but I'm tired of 
reading "industry analysts" (a euphemism 
describing someone paid a great deal of 
money to state the obvious) commenting 
about the hideous slump in the computer 
industry. 

What's even more amioying ai'e those in- 
dividuals totally outside the computer in- 
dustry who make such learned statements 
as, "Well, home computers were just the 
hula-hoops of the eighties. The 'fad' is 
over. Home computers and video games 
are going to go the way of mood rings, CB 
radios and the Bay City Rollers." 

Nonsense. The downturn in the com- 
puter industry is a slump only in compar- 
ison to the extraordinary growth it regis- 
tered in the period from, say, 1978 to 1983. 
If you consider 50% growth or more each 
year (for some companies) as "nosediving" 
to a mere 25% last year, then you'll see 



what I mean. It's a matter of comparative 
perception. Almost any other business in 
the world would be thrilled with 25% 
growth from year to year. 

From 1978 to 1983, hardware and soft- 
ware companies sprang up like shelf fim- 
gi, feeding on the mighty oaken body of 
the Personal Computer Many people made 
their fortunes off of this fledgling indus- 
try. Analysts crowed, "this growth knows 
no bounds!" then gave percentages for how 
many people would own personal com- 
puters by 1990. 

The "shakeout period" from the middle 
of 1983 to mid-1984 sobered many people, 
both in and outside of the industry. (There's 
notliing quite so educational as seeing your 
company disintegrate before your eyes.) 

What happened? I think that the ma- 
jority of people in this country (the mar- 
ketplace between 1978 and the present) 
who wanted a personal computer have al- 
ready bought one. They rushed out, un- 
leashed their wallets and bought machines 
ranging from inexpensive Commodore and 
Atari systems all the way up to Macintosh- 
es and IBM PC ATs. 

Then what? What did they do with 
them? 

Let's jump back a little bit. It stands to 
reason that, if you shelled out thousands 
of dollars for a computer system, you're go- 
ing to use it. It also indicates that you 
weren't an impulse buyer; you had impor- 
tant reasons for buying what you did. 

On the other hand, "cheap" computers, 
such as the Commodore 64 and the Atari 
800XL, succeeded in doing one thing; they 
separated the wheat from the chaff. 

If you bought an inexpensive computer, 
I hen you probably either worked yourself 
lo death and forced yourself to understand 
it, making it a useful tool; or you got frus- 
trated, gave up. decided that "computers 
are worthless," and banished the machine 
to a closet. 

lack Tramiel and the new Atari want to 
change that, and they want us — all of us, 
as Atari users — to help. 

Both the XE and ST lines are powerful 
personal computers at affordable prices. 
But ardent Atari fans already know that, 
right? 

So, spread the word. Become a spokes- 
person for Atari, If j'ou, as a programmer. 



user group member, or knowledgeable Ata- 
ri owner, know someone who's interested 
in buying a personal computer, consult 
with them. Find out their needs and help 
them make a decision. 

Don't leave them out in the cold. Sup- 
port them. Don't let them be frustrated be- 
cause they don't taiow how to exploit their 
wonderful new machine. Invite them to 
user group meetings. Tell them about use- 
ful software — educate them (but, please, 
don't undermine the software industry; let 
them buy it themselves). 

If all of the "old guard" Atari owners out 
there spread the word and support the neo- 
phytes (and many of you have done so all 
along), we'll end up strengthening Atari 
and, ultimately, ourselves. 

Last words. 

One of the common complaints of read- 
ers typing in programs from computer 
magazines is the coated stock (slick paper) 
that most magazines are printed on. Ad- 
vertisers, distributors and the typical read- 
er like coated stock, obviously — it looks 
more professional. A computer magazine 
on newsprint would probably only get ads 
for Burpee Seeds and Silicon Bill's Dis- 
count Computer Barn. 

Unfortunately, the sliiny sui-face of the 
paper reflects light and produces glare, 
making it difficult to type long programs. 
It also tends to smear easily, leading to 
blurred program lines, shrieked invectives 
and the unwrapping of single-edged razor 
blades. 

We think that we've captured the best 
of both worlds with our new paper. It's 
moderately slick, resistant to smearing and 
easier on the eyes than our other stock. (It's 
also only a little more expensive than the 
old paper. Our accormtant loves us.) 

So code in good health. We hope that 
everybody likes it. You deserve it. 



rtK 




Jon A. Bell 
Managing Editor 
ANALOG Computing 
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TOP-DOS GETS RAVE REVIEWS 



"...to anyone who mim a disk dnve, TOP-DOS is a must! 
No disk dm-e user should be ivithout. 'Peter Ellison, 
ROM Magazine 

"TOP-DOS is gimt!. . . it's worth aery penny. " Charles 
Bachand, ANALOG Computing 

"TOP-DOS is one of the most friendly, full-featured and 
useful DOS s for the Atari." Eric Clausen, 
ANTIC, The Atari Resource 

"Emily is the DOS Atari should have written. " Bob 
Culmer, Dallas, TX 

"Excellent, pmieiful. A true gem of a utility DOS. " 
Thomas A. Harris, Columbia, MD 



BUT BEGINNERS MVE IT TOO! 
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NoM' Equipped to Support 1 30 XE Ramdisk 

See your dealer KV\\\\lll///^/>^ 

TOP-DOS 1.5 $29.95* ^---^»- ^ 

Tlitorial 19.95 

1.5 plus Tutorial 39-95 

^f *Suggested Retail Price 

1058-A Marigold Court ECLIPSE 

Sunnyvale, CA 94086 

408-246-8325 Dealer inquiries welcomed 

«) 1985 ECLIPSE. TOP-DOS is a trademark of ECLIPSE. ATARI is a registered trademark of Atari, Inc. Prices are subject to cliange wittiout notice. Direct orders add $2.00 sfiipping. California residents add 7% sales tax. 
An advanced version is available to TOP-DOS licensees (at additional cost), wliich doubles the number of files, and adds sector read, write and compare, and other features. 
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READER 
COMMENT 



Calendar consult. 

I wonder if you or anyone else has en- 
countered the same problem I have with 
issue 31's Personal Planning Calendar. 

It seems, whenever you attempt to cre- 
ate a month after using the program, you 
end up with a mixtLire of the new month 
and the last one in memory. Try it; you'll 
see what I mean! 

I don't know what Wayne Gautney 
would do, but here's what I did. Change 
Line 910 to read: 

910 TRAP 2eeO:CL05E ttl:GOT 
2080 

Change Line 2004 to read: 

2004 G=PEEK(CONSOL) :IF G=6 
THEN 911 

Wiiyne had intended Lines 2000-2007 
to be a subroutine called when the pro- 
gram didn't find the month on the disk. 
Instead, the RETURN statement in Line 
2004 returned control to the main pro- 
gram and not the file portion, as was in- 
tended. These two corrections remedy 
this problem. 

Brenl Barrett 

Citrus Heights. CA 

Translator without the 800. 

I have an optional method for creat- 
ing the Home-made Translator as de- 
scribed in issue 32. The method I sug- 
gest results in exactly the same transla- 
tor. However, it does not require tliat one 
obtain the use of a model 800 computer 
to duiTip its OS. 

Since most XL owners already have 
access to the Atari Translator disk, they 
have the source for the Rev B OS right 
in their midst. You see, the B side of 
Atari's translator loads in exacth' the Rev 
B OS, save 12 bytes which are different. 

If you boot with Translator B and then 
POKE these 12 bytes with what they ai-e 
in the Rev B OS, you can then RUN 
Angelo Giambra's Home-made Transla- 



tor BASIC program. Voila! You have the 
Translator. No need to find an 800. 

The corrected POKEs can be inserted 
with the following lines: 

71 POKE 59103, 141:P0KE 591 
e4,3:P0KE 59105,211 

72 POKE 59111. 141:P0KE 591 
12,l:P0KE 59113,211 

73 POKE 62063,24 :POKE 6206 
4, 105: POKE 62065,16 

74 POKE 62083, 157:P0KE 620 
84,0: POKE 62085,211 

By the way, since Atari's Translator B 
is, in essence, exactly the Rev B OS, I 
have never found it to fail in solving a 
compatibility problem with a program 
that was XL sensitive. 

Congratulations to you and Mr. Ciam- 
bra for an outstanding piece of truly use- 
ful programming. I use the Home-made 
Translator mostly to get the extra 4I< of 
memory. With terminal programs and 
with word processors, the larger buffer 
is great. 

Even though 1 enjoy the extra bank- 
selecled memory of my 130XE, it seems 
that, once you've tasted extra memory, 
you never want to go back to less. 

I hope your readers find my sugges- 
tion useful. 

Sincerely, 

D.D. Davids, II 

Honolulu, HI 

Unlcheck it! 

hi yom- issue 31 Reader Comment col- 
umn, I note Mr. L. Eugene Donie had 
problems with Dragonlord (isse 29) on 
his 800XL. I have an 80()XL and experi- 
enced similar problems, but his fix did 
not work for me. Your recommendations 
for LIST. ENTER and SAVE techniques 
did not work, either, but it did work on 
some other programs I have — thanks. 

Fortunately, the same issue had the 
l^rogram listing for Unicheck! After typ- 
ing it in and checking Dragonlord, three 
hard-to-spot errors were found in my 



original typing. These were corrected, 
and Dragonlord ran perfectly. 

The reason I am writing is to let you 
know that there is no problem with the 
program as listed for the 800XL. It's very 
hard to find certain typing errors, and 
long programs such as Dragonlord make 
it extra tough. My wife and I closely 
checked the typing several times, but we 
still missed these three errors — could 
happen to anyone. Unicheck is an i-!X- 
tremely helpful test for program typing 
errors, and I surely recommend it. 

I enjoy reading your excellent maga- 
zine and look forward to receiving each 
issue. 

Very truly yours. 

Roger E. Kirkpatrick, Sr. 

Mobile, AL 

DOS XL 2.3 with 
machine language. 

For those people who own DOS XL 
version 2.3 in double density. I think I 
can help if you've had trouble loading 
many of the machine language games in 
ANALOG Computing or elsewhere. 

I recently wrote to O.S.S. about this, 
and was told that programs that take 
LOMEM for granted sometimes will not 
work properly in double density. I was 
told to take the following steps: 

(1) Boot up with your Double Density 
DOS XL Master disk with BASIC in- 
stalled (do noi use BASIC XL or any oth- 
er language). 

(2) When in BASIC, type POKE 1802, 
-J and RETURN, then POKE 1801,4 and 
RETURN. Next, press SYSTEM RESET. 
You'll notice when you press RESET 
thai the longer, low humming noise will 
be replaced by a very short humming 
noise. 

(3) Now go to DOS and make sure 
your master disk is in drive 1. Type INIT 
to load the "initialize disk" program. 

(conlinuf.'d on page 9) 
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AMERICA 



E BUILT IT FOR YOU 

THE ATARI 520ST 



"We promised. 
We delivered. 
With pride, 
determination, 
and good old 
ATAW know how." 
Satn Tramiel, 
President, 
ATARI CORP. 



No Other computer we know of 
has been awaited with such antici- 
pation, has received so much 
national and trade press, and has 
been so unanimously acclaimed — 
as the remarkable 520ST. 

And for good reason. Its develop- 
ment represents a bold, new stan- 
dard in personal computing power. 
The 520ST simply obsoletes all current personal 
systems — even those costing thousands of dollars 
more. Beneath its full stroke 
94-key keyboard is an operating 
environment so intelligent that 
it puts you in command almost 
at once. It's that easy. 

Graphic symbols quickly 
identify available functions. 
Menus appear just by aiming 
the mouse. Point to a specific operation, 
click the mouse and Instantly you are 
able to develop full color charts, recall 
files from within folders, and so much 
more. 

And when you combine 524,288 
bytes of RAM with ATARI'S custom 
circuits and the horsepower of a 68000 
microprocessor, you own a powerful 
computer that delivers crisp, high re- 
solution images with incredible speed. 





With a monochrome monitor 

your 520ST displays 640 x 400 

pixels of extremely high resolu- 
tion clarity. Select a color monitor 

and you are able to create beautiful 

graphs and diagrams from a pal- 
ette of 512 vivid colors. 

Power to grow. An array of 

expansion ports allow you to easily customize your 

520ST. There are standard serial and parallel interface 

ports for connecting printers and 

telecommunications equipment, 

MIDI connectors to interface with 

music synthesizers and keyboards, 

and 3.5 inch floppy disk, cartridge 

and joystick ports. There is also a 

hard disk port with the lightening 

communications speed of 1.33 

Megabytes per second. ATARI 520ST systems are avail- 
able now. When it comes to 
state-of-ttie-art technology 
...don't settle for less. And 
when it comes to price 
...don't pay a penny more. 

For the dealer nearest you call 

408/745-2367. 

Or write to: 

ATARI Corp. 

Customer Service 

11 96 Borregas Ave. 

Sunnyvale, CA 94086 
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ANALOG 
Computing is 

giving away a new Atari 
520ST computer! Tliat's rigtit, one lucky TCS 
subscriber will win one of Atari's fantastic 16-bit ma- 
chines (a $599 value), just for joining the ANALOG 
Computing TCS! 

Contest rules. 
Everyone who joins the ANALOG Computing TCS 
before midnight Eastern Daylight Time, July 31, 1985, 
will be automatically entered into a special drawing 
that will be held on August 14, 1985. 

The contest is open to all TCS subscribers with 
active accounts at the time of the drawing. ANALOG 
Computing employees are not eligible to enter 



If you're 
already a TCS 
subscriber, you don't have to 
do anything to enter If you have a friend who isn't a 
TCS subscriber yet, tell them about the giveaway! 
This drawing is our way of saying "thanks" to all 
the people who have made the ANALOG Comput- 
ing TCS a terrific success. Good luck! 

For information on joining tiie ANALOG Comput- 
ing TCS, see tlie ad elsewtiere in tliis issue. 
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READER COMMENT 



continued 



when faced with the usual prompts, re- 
move your master disk from the drive 
and insert a blank disk. 

(4) Use option 2 to format disk and 
write your new. compatible DOS to the 
blank disk. 

(5) Now simply copy all your machine 
language games over to the blank disk. 
Make sure you give them the .COM ex- 
tension: e.g., DEFENSE.COM. Reboot 
your system and type the name of the 
game. 

You should not use the MENU.COM 
file, as 1 was told not to. 

What all of this does is limit the num- 
ber of addressable drives to one and the 
number of openable files to two. It fixes 
the LOMEM problem. It may be limit- 
ing for programining, but you'll only use 
this disk for your ANALOG Computing 
games, anyway. 

I hope this has helped any readers 
who've experienced this problem. 

Robbie Catron 

Flemingsburg, KY 

Wire color confusion. 

Sorry to rain on Mr. Anthony A. No- 
gas' parade, but a suggestion he offers 
in his page 7, issue 32 letter could get 
some Atari enthusiasts in trouble. 

His idea to use Radio Shack joystick 
extension cords as cheaper sources of 
prewired plugs for Cheep Talk (issue 29) 
is fine, and is popularly used by Atari 
hardware hobbyists. In the text of the let- 
ter published, you gave the pin number/ 
wire colors for these cables. 




PERSISTENT 

RAM NEVER 

FORGETS 

REPLACES ANY ROM 
CARTRIDGE* 

Permanent data storage in cartridge RAM. 
Uses inexpensive long-life littiium cell. 
No erasing or programming needed. 

• Instantly duplicates and customizes 
any cartridge. 

• Complete software for saving cartridges. 

• RAIVl/ROfvl sv^itch. 

• Works witfi Atari 400/800, 600/800XL, 
65/130XE. 

• 3 month warranty. 

'excludes bank-select cartridges 

PERSISTENT RAM 

cartridge.- and software $79.95 U.S. 
Price includes shipping and handling. 

We accept VISA, Mastercard or money order. 
Phone orders,- feo-*) 942-7049 

Inlra-Tech Computer Products 

695 - 810 W. Broadway, Vancouver, B.C. Canada 



No. No. No. . .! 

The colors of the wires in the joystick 
extension cables is nof consistent from 
one cable to the next. The cables are 
wired correctly, but Radio Shack never 
figured that people would be opening 
the things up. I fomid this out, in fact, 
when debugging my own Cheep Talk. 
Since then, I have heard other Atari ex- 
perimenters confirm the fact. 

As it could possibly cause internal 
harm to an Atari computer, please point 
out in your next issue that it is fine to 
use the joystick cables, as long as one 
is sure to use a meter to find the colors 
of the wires on each particular cable. 

Thank you. Oh, yes, . .Cheep Talk 
works great. 

Sincerely, 

D.D. Davids, II 

Honolulu, HI 

Printer Driver suggestions. 

Can't tell you how delighted I am with 
the AtariWriter Printer Driver program 
in ANALOG Computing's issue 32 (at 
last, a continuous underline). 

There are two errors in the suggested 
Epson codes. The 48s and 49s are okay, 
although Os and Is will work just as 
well. However, the Master Select Code 
for the default mode must be 27,33,8 for 
emphasized pica (or 27,33,0 for standard 
pica), and the Master Select Code for 
condensed must be 27,33,4. The codes 
in the article will give expanded, em- 
phasized and double-strike as default. 

However, I strongly recommend that 



the codes for pica and for condensed be 
entered as 18 and 15, respectively, for the 
following reasons: 

(1) If you select italics (CTRL-O 27 
CTRL-O 52) in the body of your docu- 
ment, it will be effective until the italics- 
off code (CTRL-O 27 CTRL-O 53) is giv- 
en. Whereas, if the Master Select Code 
is used in the driver program, the ital- 
ics will be cancelled at the beginning of 
the next line. 

(2) Similarly, the codes for empha- 
sized (CTRL-O 27E) or for double-strike 
(CTRL-O 27G) will be cancelled after the 
first page if the driver program uses the 
Master Select Codes. 

(3) Many of today's printers allow one 
to select print modes with pushbuttons 
on the printer. If Master Select Codes are 
used in the Printer Driver, these modes 
will be reset to the default mode before 
printing begins. 

The APX driver programs have long 
frustrated me with just these problems 
(first on my Gemini 10 and then on my 
new Epson LX-80), only I never knew 
the cause! Thank you, CD. Welker, for 
a program that I can tailor just the way 
I want it. 

Now, if someone could just figiu'e out 
how to toggle between INSERT and RE- 
PLACE modes. . . 

Sincerely 

Carolyn Hoglin 

Orlando. FL 

(colli iuuf^l on page 94) 



Nei/vl 



ENCOUNTER 

• ROM Cartridge for all ATARI 
400/800/XUXE with 16K and one 
joystick 

• Teaching the player aged 3 to 15, 
addition, subtraction, multiplica- 
tion and division 

• 7 levels designed for self-learning, 
testing and entertaining — abso- 
lutely ingenious 

• Fast real-time graphics via perfect 
machine language programming 

• Over 20,000 math problems with 
breath-taking packaging 

$39.50 list; Introductory offer $24.50 

Including shipping and tax; Full 

refund guaranteed If the product Is 

returned within 30 days; Cashiers 

check or MO/VISA card; Order now. 

HSU SOFTWARE 

365 Mira Sol • P. O. Box 12037 

San Luis Obispo, CA 93406 

(805) 544-8888 
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j^^"- This 
^ ^^o"^ unique club 
s-e-^ beats them all 



DISK-OF-THE-MONTH CLUB n| 

P.O. BOX 116, FAIR UWN, N.J. 07410-0116 



■ STRtPADOWSS 

' CITV STATE ZIP 
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Two Great New Products From CDY 
One Of Them For Free! 



OMNIVIEW XL/XE & SpcedSaipt HO 

WARNING: No K{)()XL/130X[-: owner should road Ihisnd unless Ihey have 
60 bucks to invest in iheir computer! Due to the outstanding value of this 
product, you may find it too irresistible to be without. 

OK. don't say you were not warned. Wo are now going lo entice you witli 
some ofOMNIVIEW XL/XE"s bountiful features: 

■A-SOO compatible operating system that runs virtually every piece of 
commercial ATARI soflwaro. Press a console switch locopy the OS into 
RAM and free up ihe SCOOO page (i.e.. a built-in translator disk). 

■A-Thoresident ramdisk handlers can be used by XI- owners with many 
popular programs and OOS's to treat Ihe extra (i4K of RAM as an ultra- 
fast disk i.iri\o. 

"*-Tho FASTCHIP Hoating point package is provided for signiricanll> 
faster and more accurate math operations. 

■*■ 80 columns operation under many environments including l.eller/ Data 
Perfect. BASIC'. MAC6.\ and ATRS(H)0 CPM. 

■A-And here comes the real teaser! lor a long lime people ha\e been 
asking if OMNIVIi-W can be used lo give ATARIW Rll 1:R SO olumii 
screen output. Regretfully we have always had to say no. In fact, we nuisi 
still say no. but we have got something e\on betler lo offer! SpccdScripi Si) 
is a wonderful new word processor designed for use with OMNIVII' W, It 
is as easy lo use as ATARiWRH I-R and much more powerful! And CD"* 
will provide S/wi'dScripi ,S() with every OMNIVIEW al no extra charge' 
Current OMNIVIEW owners can purchase S/xrcASr/v/j/ W:/ directly from 
us for only SIO. 

Of course. 4()0/K(K) owners can also enjoy the power and convenience of 
OMNIVIEW (including S/HrJScript <SV)by adding the 4K or NK 
OMNIVIEW to the OMNIMON piggyback board or the Ramrod OS 
board. These OMNIVIEWs also include resident ramdisk handlers for 
use with the AXLON Ramdisk. If you are serious about enhancing ihe 
performance of your compuler. yt)u will be delighted wiili the unique 
features ofOMNIVIEW! 

Feature Comparision Chart 



Enhanced OS 
includes FASTCHIP FP 
80 Column Ernulalton 
Ramdisk Handlers 
OMNIMON Features 
A Allei Memory 
B Boot (Ram) disk 
CCPU Registers 
D Display Memory 
ESingle Step Execution 
F Fill Program Buffer 
G Biriary Load/Oirectory 
H Hex Conversion 
H Hex Aritfimelic 
f.lnslall Ramdisk Handlers 
J Jump Subroutine (JSR) 
L Drive Selection/Control 
M Move Block of Memory 
N Relocate 6502 Code 
Operate from Prog. Buffer 
P Printer Control 
R/Read Seclor(s)from Disk 
S.Search Mem fot Sequence 
T.Tog Hex Ctiar Display Mode 
U User's Custom Command 

V Verily 2 Blocks of Memory 
W.Wrile Sectof(s) to Disk 
X:Disassemble Memory 

Y Lme Assembler 
Z:Exit Monitor 
Lockup Recovery 
Redirection of Printer I/O 
Talk to Happy Ram Buffer 
80 Column ATRMON for 
Includes SpeedScript 80 



OMNIMON Ramrod 
Piggyback OS board 
400/800 800 



Upgrades for 

— OMNIMON or Ramrod 
8K0MN1 6KVIEW 



Ramrod XL Add-on for 

Piggyback Ramrod XL 

KVIEW 800XL VIEWXtVXE 



How To Order 

Add $2.00 shipping ($4.00 for 2 day delivery). Wc accept Visa or Master 
Card orders but would prefer to send COD (cash or M O only). Wc will 
gladly pay all shipping charges for COD orders. 



Incredibly powerful debugging monitor! 

OMNIMON is a ROM resident extension of the ATARI operating system 
whieh adds a new dimension to your maehino! In the hands of a novice 
prt)gram merit is a wonderful learning tool for discovering the many secrets 
of your ATARI. And the more you learn, the more OMNIMON has to offer, 
so that experts Hnd il indisponsihie for its power and convenience. Il installs 
permanently and gives you complete control over your computer, and even 
though it is always availahie (by pressing StLECT and SYSTtM RHSET). 
it takes up no user memor\ because it resides in the unused 4K block at 
SC ()()(). I'se it to interrupt, examine, and manipulate any program in 
niemoi-> whether it he disk, cassette, or cartridge based. Il is especially good 
lor program de\elopmenI or customization of existing programs. The 
llexible disk I/O allows you to write lo or read from disk in either single or 
double lien si t\ so ihal you can edit raw sector data or even load a Hie without 
DOS, Man\ ilcbuggingtoots are al your disposal: Display/Alter memory or 
(otl2 registers. Disassemble memory. Search memory. Hex/C har modes. 
.Single Slop execulion. JSR or GOTO address. Push/Pull slack. Printer 
dump etc, .A toggle s\shch allows you lo make OMNIMON invisible to 
L!. lines v,\hich might he looking for il. making il compatible with all 
sniiware. 

II ;iil ol [hw power weren't enough, cerlain \ersions of OMNIMON ha\e 
e\cn more lealures' Ihe SK OMNIMON and OMNIMONXL have Hex 
( on\eisi(m and Ilex Ariihmetic. Block Move, a Rolocator. and a Line 
\^semblel A Hinar> Load command allows you loloadan> binar> load file 
uiihoui D( )S .iiul Llouhlesa.satliskdireclor>' command which prints out the 
start sector of each Hie Lockup recover) allows you to recover from system 
lockup, ineaning th.it vsIkmi \ our compuler freezes, you can usua!l\ salvage 
ihe program oi lexi I'lle in memor\ b\ popping into OMNIMON and 
dumping memor> to ilisk. .AiUanced users will like the user extendibiliiy 
lealure which allows them lo make use of the interface routines of SK 
OMNIMON m ihciroun sol iware. The SK OMNIMON also has resident 
\.\LON kaiiidisk h,l[ulle^^. allowing you to use this powerful device as an 
iiliia fjsidisk drive wjih almosi any DOS which uses standard SIO calls and 
e\en bool prniirams like word processors, (.lata bases, antl games which 
access ihe disk a lol Once sou ha\e an OMNIMON in your system, you will 
wonder how \oli e\er tlid wiihout il! 



Pricing 

400/800. Piggyback board plugs into existing OS board Inexpensive and easily disabled 

OMNIMON piggyback board (includes 4K standard OMNIMON) $69.95 

OMNIMON piggyback board & OMNIVIEW $94.95 

OMNIMON piggyback board & 8K OMNIVIEW $109,95 

OMNIMON piggyback board & 8K OMNIMON $109.95 

Add FASTCHIP floating point loanyof the above $15,00 

FASTCHIP floating point package by itself $19.95 

OMNIVIEW (or piggyback or Ramrod OS board $29,95 

8K OMNIVIEW or 8K OMNIMON lor piggyback or Ramrod $44 95 

800 Ramrod OS board replaces existing OS board and comes with entianced OS in EPROMs. It tias 2 
sockets (or OMNIMON/OMNIVIEW enhancements which can be selected with a switch. 
Ramrod OS & OMNIVIEW $1 14.95 

Ramrod OS & 8K 0(^NIVIEW $129.95 

Ramrod OS & 8K OMNIMON $129.95 

Ramrod OS & 8K OIVINIMON & OMNIVIEW $154.95 

Add FASTCHIP floating point to any o( the above $15,00 

600XU800XLyi30XE: Replace existing OS chip or add Ramrod XL to select between 3 possible OS's. 

S59.95 

$99.95 

$144,95 

$39.95 
$69.95 
$34.95 
call 
call 
$10,00 



OMNIVIEW XL/XE (includes FASTCHIP and 800 compatible OS) 
Ramrod XL & OMNIMONXL (includes FASTCHIP & 800 compatible OS) 
Ramrod XL & OMNIMONXL & OMNIVIEW XL/XE (combination of all above) 
Ottier fine products 

LJK Letter Perfect or Data Periecl 

OSS BASIC XL, MAC 65 or ACTION 

OSS BASIC XL, MAC 65 or ACTION tool kit 

Monochrome monitor adaptor for 400 (perfect for OMNIVIEW) 

AXLON Rampower 128 (Ramdisk) 

Spt-rdSiTipr S(l (for current owners of OMNIVIEW) 




CDY Consulting 

421 Hanbee 

Richardson, TX 75080 

(214) 235-2146 

Di:ALr:RS INQUIRIES SOLICITEn 
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GRIFFIN'S 
LAIR 



Educational Programs 
Review 




by Braden E. Griffin, M.D. 

And crawling on the planet's face. . . 
some insects, caJJed the Human Hace 
. . . lost in Time. . .and Jost in Space. . . 
and meaning. With that perspective of 
our galactic importance, borrowed from 
Tiie Hocky Horror Picture Show, I will 
proceed to climb upon my shaky soap- 
box to introduce this month's column in 
an issue featuring education. 

It's obvious that software producers 
responsible for the design of education- 
al objectives — and for the means to ac- 
complish those objectives — need a keen 
understanding of the learning capabili- 
ties of the specific target group. This is 
particularly true in designing programs 
for the preschooler. 

Many educational programs aimed at 
this group profess to enhance numerous 
learning skills. A parent's cursory view- 
ing of these programs seems to confirm 
this, but we must be sure that they truly 
are designed to educate children — and 
not just to make adults think they will 
do so. 

Several methods are available to pre- 



vent this pitfall. The best way to be sui-e 
that a program is appropriate for an in- 
dividual child is to have that child play 
the desired game in a software store. 
This is often difficult to accomplish and 
not usually encouraged by salespeople. 
Surely, time spent pushing the new and 
popular action games to juveniles and 
"juvenists" (i.e., adult juveniles) is more 
profitable. 

A second method is through study of 
reviews in computer magazines. Here, 
the potential problem is that reviewers 
are no more aware of the educational 
capabilities of different age groups than 
their readers. I claim little, if any, advan- 
tage over other reviewers because of my 
backgromid as a pediatrician. 

The usual training in this specialty is 
great for treating asthma, but abysmal 
in the area of normal development of 
learning skills. The medical-legal liabil- 
ity of not knowing that logical thinking 
develops around age eight or nine be- 
comes a whiter shade of pale when com- 
pared to not knowing the correct dose 
of adrenalin. 

Maybe the most reliable and univer- 
sally accessible method for selection of 



educational softwai'e, particularly for the 
very young, is based on the reputation 
of the manufacturer. If one has previous 
positive experience with a product line, 
then rely on that . . .until it proves false. 
Companies need to maintain a consis- 
tent level of quality to be successful. 

An example of an organization with 
an excellent reputation for a specific age 
group is the Children's Television Work- 
shop. If I were going to buy a program 
to teach advanced physics, one featur- 
ing Niels "Big Bird" Bohr wouldn't ex- 
actly make my credit card jump from my 
wallet. However, the reputation of CTW 
and their educational TV shows aimed 
at preschool children does lend credi- 
bility to the expected quality of software 
designed for that age group. 

Established and reputable names in 
other fields of software design need to 
first demonstrate their ability in the de- 
velopment of educational material ap- 
propriate for young children, not just 
their abilities in programming. 

Alas, be careful of purported exper- 
tise of designers. I recall the dilemma 
of the barbershop quartet in The iVfusic 
Man , as they were constantly being side- 
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tracked by the evasive Professor Harold 
Hill in their quest for his "creee-den- 
tials." (This is likely the first time that 
the two motion picture musicals referred 
to this month have been used in the 
same article. Is that eclectic, or what? 
Did I hear someone say emetic?) 

That well-credentialed game designer 
may be the Professor of Math and Com- 
puter Science at the University of the 
Trees! The sci-fi flicks of the fifties from 
RKO gave the aura of competence as we 
entered buildings bearing the stone in- 
scription "Doctor of Research." They 
were usually the ones who wanted to de- 
velop your brain in a solution of bub- 
bling formaldehyde. 

Look past the flash for the flesh. (I 
seem to be repeating myself in my old 
age.) I seem to be repeating myself in . . . 
Anyway, two educational programs for 
preschoolers from the Children's Televi- 
sion Workshop, a group with a well- 
established and trusted reputation, are 
reviewed this month. 

ASTRO-GROVER 
CBS SOFTWARE 
A Unit of CBS, Inc. 
Greenwich, CT 06836 
Cartridge, 48K Cassette or Disk 
$34.95 

A few months ago, I reviewed a cou- 
ple of educational games from the Chil- 
dren's Television Workshop's "Sesame 
Street" series. This is the first of two 
more superb offerings from the world of 
the Muppets. 




Aslro-Grover. 

This game is designed to teach early 
number concepts to children from the 
ages of three to six years. Who better to 
do this than Grover, er. . .should I say 
Astro-Grover? If he had been aboard the 
space shuttle which had difficulty de- 
ploying a functioning satellite for India, 
the Sikhs could have been preoccupied 
watching "Legends of Miniature Golf" 



on ESPN! 

The game employs a vinyl EasyKey 
keyboard overlay similar to those used 
in previous "Sesame Street" programs. 
This makes it easier for preschoolers to 
interface with the computer, or, in oth- 
er words, to keep grimy little, Popsicle- 
laden fingers off the actual keyboard. 

Everything necessary for parents to 
understand how the game is played can 
be fomid in a comprehensive manual or 
on the Easy-To-Play card . The kids will 
probably not need either to begin play- 
ing. Kids are like that . . .yeah, they are. 

The overlay consists of the numbers 
1 to 9, up and down arrows to control 
the Beam, a handy PAUSE key, the LEV- 
EL key to access any of the five avail- 
able levels, and the PLAY key to start the 
game. 

The different levels use small flying 
spaceships, called Zips, lo help one's 
child develop skills in counting, adding 
and subtracting, in a progressive fash- 
ion. Either matching numbers of Zips or 
performing basic math operations on 
two groups of Zips displayed on the 
screen results in watching these help- 
ful aliens construct a city. 

Clever, colorful graphics which don't 
overwhelm children are used to enhance 
the learning process. This game is well 
designed and quite appropriate for pre- 
schoolers. The combination of computer 
assisted instruction and the "Sesame 
Street" surroundings provides an ideal 
environment for yomig, eager minds. 

LETTER-GO-ROUND 
CBS SOFTWARE 
A Unit of CBS, Inc. 
Greenwicfi, CT 06836 
Cartridge, 48K Cassette or Disl< 
$34.95 

The second piece of "Sesame Street" 
educational software for three- to six- 
year-olds reviewed this month, Letter- 
Go-Round, uses a sound approach to the 
development of early reading skills. 

Letter recognition, upper/lower case 
matching, word recognition and match- 
ing, and simply spelling are all encom- 
passed in this visit to a carnival's Ferris 
wheel with soine familiar Muppet char- 
acters. A child may pick any of three 
Muppet pals with whom to play: Bark- 
ley, the Cookie Monster or the ubiqui- 
tous Grover. 

Employing the EasyKey type of key- 
board overlay previously described gives 
the child a limited number of keyboard 
entries from which to choose. Added to 



the PAUSE, LEVEL and PLAY keys are 
three keys used to select the Muppet 
playmate, two keys used to change the 
speed of the letter-containing Ferris 
wheel, and a STOP key placed over the 
entire SPACE BAR area, which is used 
to select desired letters. 




Letter-Go-Round . 

Again, along with protecting the key- 
board from pervasive glomp, the over- 
lay helps to promote letter recognition 
on the screen and doesn't distract the 
child's attention from this objective by 
introducing a non-productive keyboard 
search for the matching letter. 

Older children can accomplish this 
keyboard search without difficulty, but 
they've already developed letter recog- 
nition. Without this skill, the retention 
of the mental image, even for a few sec- 
onds, tends to distract the young mind. 
The designers of this game show the 
awareness of learning techniques neces- 
sary for preschoolers alluded to in the 
introduction this month. 

The six levels provide the progression 
from very basic letter recognition to sim- 
ple spelling, with opportmiities to prac- 
tice learned skills before advancing to 
greater challenges. 

Levels 1, 2 and 3 have the child match 
letters in upper and lower case formats. 
Level 4 requires the child to match each 
letter of a displayed three-letter word. 

In level 5, a three-letter word is dis- 
played, with one of the letters missing. 
The missing letter is picked from one of 
the six letters which make up the spin- 
ning Ferris wheel. 

In the final level, three blank spaces 
are shown. The child must spell a word 
from the letters displayed on the Ferris 
wheel. The secret word comes from a 
list of over one hundred and seventy 
words in the game's vocabulary. 

Selection of the first letter is a matter 
of trial and error. Once this is done, the 
child is able to choose subsequent let- 
ters based on recognizable spelling pat- 
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terns. Though this is fairly challenging, 
it's amazing to see how quickly young- 
sters pick up these techniques. 

All of the levels reward correct re- 
sponses with visual and auditory stimuli 
and do not discourage wrong entries. 
Additionally, those levels where correct 
responses aren't apparent after a rea- 
sonable number of attempts supply the 
correct answer. 

As with all CBS Software products, 
delightful graphics and music comple- 
ment an excellent educational design. 
Letter-Go-Round? Go for if! D 

Dr. Gri/j'in, as Chief o/ Newborn Medi- 
cine at a perinatal center, spends most 
o/his time in the newborn intensive care 
word. Off-hours, he's been using an Atari 
800 /or /our years. In keeping with his 
gentle profession o/ nurturing preemies. 
Dr. Griffin's number one game is Crush, 
Crumble, Chomp. 



Want to Subscribe? 



It's worth it. 



CALL TOLL FREE 
1-800-345-8112 

In Pennsylvania 

1-800-662-2444 




FROM 

THREE 

PDQ DISKS 

AND ANEW 

FUTURE 

59.95 

There is untapped potential in your Atari. And, perhaps, in 
you. . . 

We'd like to share an opportunity too unique and worth- 
while to describe in an ad. We're offering this remarkable 
bargain so you can see it for yourself without risk. 

Order three PDQ (Premium Disk Quality) Disks (DSDD, 
21-year Warranty) for only $9.95. The front of each disk is 
ready for you to format and use. Boot in the program on the 
back (min. system: 48-K), and you may be surprised at what 
your Atari tells you. 

Order PDQ! Write "PDQ" on a paper, with your (legible!) 
name and address; send with $9.95 {We'll pay the shipping 
for USA and Canada. NYS residents add 7% Sales Tax) to: 

Dept. 41 

13 White St. 

Seneca Falls, N.Y. 13148 

Limit: one order per address, please. 

Atari- is a registered trademark of Atari Corporation. 
Senecom' is a registered trademarif of Seneca Computer Company, Inc. 



ELECTRONIC-ONE 



ATARI COMPUTER SOFTWARE 


CODE WRITER (NEW) 


.37.99 


FILE WRITER (FROM ATARI) , 


.19.99 


REPORTWRITER 


.19.99 


HGMEINTERGRATOR 


.19.99 


SMALL BUS. INVENTORY . . 


. 9.95 


SALES & EXPENSES 


. 9.99 


ACCOUNTS REC. S PAY. . . 


. 9.99 


ADVENTURE WRITER 


.16.99 


MACROASSEMBLER 


.17.99 


ASSEMBLER EDITOR 


.19.99 


ATARI WRITER 


.19.99 


SYN FILE 


.35.99 


SYN CALC 


.35.99 


ATARI LAB STARTER KIT ... 


.42.99 


SPECIAL - SPECIAL - SPECIAL 


PRINTSHOP 


.26.99 


CENTIPEDE 


. 7.99 


ASTEROIDS 


. 7.99 


QIX 


. 7.99 


SPACE INVADERS 


. 7.99 


DEFENDER 


. 7.99 


TOUCH TYPING 


, 7.99 


PENGO 


9.99 


JUNGLEHUNT 


. 9.99 


JOUST 


. 9.99 


ROBOTRON 


. 9.99 


DONKEY KONG 


.14.99 


POLE POSITION 


.14.99 


MS PAC MAN 


14 99 





A, 

ATARI 



THE 

LOWEST 

PRICES 

THE 

BEST 

SERVICE 

ELECTRONIC ^^,, 

ONE (614) S64-9994 

P.O. Box 13428 • Columbus, Oh. 43213 



THIS MONTH'S 
SUPER SPECIAL 

INDUST GT 

DISK 

DRIVE 



21400 



THE LOWEST PRICES 


ATARI COMPUTER HARDWARE 

ATARI BOOXL 88.00 


130XE 


138 00 


520ST 


CAI 1 




DISK DRIVES 

ATARI! 050 


.148.00 


RANA1000 


168.00 


ASTRA (BIG D) 


. 569.99 


ATARI HARDWARE ACCESSORIES 

STAR SGI 228 00 


EPSON LX80 


.178.00 


ATAR1 1 027 


198 00 


ATAR1 1025 


.148.00 


ATARI 1020 


. 38.00 


MPP1000E MODEM 

ATAR1 1030 MODEM 

CX77 TOUCH TABLET 

APE FACE 


. 68.00 

. 68.00 

. 39.99 

44.99 


M PP 1 1 50 


. 49.99 


U PRINT 


. 49.99 


TURBOPRINT 


. 49.99 



HOW TO ORDER: CASHIER CHECK, MONEY ORDER, MASTERCARD" OR 
VISA* (Add 4% for charge cards) ... NO PERSONAL CHECKS ... NO 
C.O.D.'s . . . SHIPPED U.P.S. 

SHIPPING: Prompt one day shipping on in-stock merchandise. Ohio residents 
add 5.5% sales tax. Add $3.00 on all orders under $100.00 . . . Add $5.00 on 
all orders over $100.00. 

INTERNATIONAL: Add 15% to all orders and A.P.O. orders. 
CALL OR WRITE FOR FREE CATALOG 



ELECTRONIC ONE* 



r6l4J 864-9994 



P.O. Box 13428 • Columbus, Ohio 43213 
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ATARI 800 COMPUTERS — $69.00 

RECONDITIONED "IN THE FOAM", NEW LOOKING 
NOT INCLUDING POWER SUPPLY TRANSFORMER ($15.00 extra) 



. ATARIWRITER, complete — $29.00 

. ATARIWRITER, no box or book — $12.00 

• 820 or 822 Printer, complete w/cable and 
paper, no interface needed — $39.00 

. Special Edition Disk Drive made from ATARI® 
810 boards, in custom case — $1 89.00 

. DE RE ATARI -$9.95 

. 800 Computer 5 board set ROM, RAM, 
CPU, MOTHER, SIDE — $39.00 



• PAC MAN, no box, clean new 
cartridge — $5.00 

. BMC Amber Monitor — $79.00 

• BMC Color Monitor — $199.00 
. Cables, Parts — Call 

• Double Sided Quad Density Disks, 
box of ten — $19.00 

. 830 Modem — $19.00 

. Touch Type — $5.00 



California residents add sales tax 
Minimum shipping cliarge $5.00 

Everything for the ATARI Systems to Parts 



SAN JOSE COMPUTER 

1844 Almaden Rd. Unit E 

San Jose, CA95125 

(408) 723-2025 




YOU CANT TELL 

A DISK DRIVE 

BY ITS COVER!! 




WITH A HAPPY ENHANCEMENT INSTALLED THESE ARE 
THE MOST POWERFUL DISK DRIVES FOR YOUR ATARI COMPUTER 

WARP SPEED SOFTWARE DISK READING AND WRITING 500% FASTER 

HAPPY BACKUP — Easy to use backup of even the most heavily protected disks 

HAPPY COMPACTOR — Combines 8 disks into 1 disk with a menu 

WARP SPEED DOS - Improved Atari DOS 2. OS with WARP SPEED reading & writing 

SECTOR COPIER — Whole disk read, write and verify in 105 seconds 

1050 ENHANCEMENT — Supports single, 1050 double, and true double density 

810 ENHANCEMENT — Supports single density 

SPECIAL SUGGESTED RETAIL PRICE: Get the HAPPY ENHANCEMENT 810 or 1050 version with the HAPPY BACKUP PROGRAM 
plus the multi drive HAPPY BACKUP PROGRAM, plus the HAPPY COMPACTOR PROGRAM, plus the HAPPY DRIVE DOS plus the 
HAPPY SECTOR COPY, all with WARP DRIVE SPEED, including our diagnostic, a $350.00 value for only $249.95, for a limited time only! 
Price includes shipping by air mail to U.S.A. and Canada. Foreign orders add $10.00 and send an international money order payable through a 
U.S.A. bank. California orders add $16.25 state sales tax. Cashiers check or money order for immediate shipment ft-om stock. Personal checks require 
2-3 weeks to clear. Cash COD available by phone order and charges will be added. No credit card orders accepted. ENHANCEMENTS for other 
ATARI compatible drives coming soon, call for information. Specify 1050 or 810 ENHANCEMENT, all 1050s use the same ENHANCEMENT. 
Please specify -H model for all 810 disk drives purchased new after February 1982, call for help in 810 ENHANCEMENT model selection. Dealers 

now throughout the world, call for the number of the dealer closest to you. ATARI is a registered trademark of Atari Computer Inc 



HAPPY COMPUTERS, INC. 



p. O. Box 1268 



iVlorgan Hill, California 95037 



(408) 779-3830 
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HULTIPLE / 
OHOICE V 
ElOCABULARY 

OUIZ 



by Alfred H. Filskov, III 



Any student who takes an English class, a foreign 
language class or an SAT preparation class can ap- 
preciate the importance of doing well on vocabulary 
tests. Words and definitions are given, leaving the 
student with the job of memorizing them. 

Unfortunately, memorizing vocabulary is a diffi- 
cult task, as human memory isn't very stable, and peo- 
ple have a nasty habit of growing bored with study- 
ing. This is what prompted me to write Multiple 
Choice Vocabulary Quiz (hereafter called MCVQ). It 
makes studying at least bearable, while really teach- 
ing you vocabulary. 

The program. 

MCVQ is a BASIC program designed to drill the 
student in a list of words entered by the user. It's 
menu driven and provides plenty of instructions. Op- 
tions can be selected with a joystick, thus minimiz- 
ing keyboard use. As you move the pointer between 
menu options, a familiar tune is played in the back- 
ground. Other features include error trapping and 
"are you sure?" prompts. 

ANALOG COMPUTING 



The quiz MCVQ gives is in multiple choice format. 
The program will ask you to choose the definition 
of a word out of a list of five definitions printed on 
the screen. If the correct definition is chosen, the pro- 
gram will tell you you're right and move on to the 
next word. If you're wrong, you'll be shown the cor- 
rect definition and quizzed on that word again later. 
At the end of the quiz, you will be given a score in 
percent form. 

Menu options. 

The following is a listing and description of op- 
tions shown on the menu of MCVQ. 

Create a vocabulary list — Allows you to enter 
a new list of words and definitions. 

Add to the list — Lets you add words and defi- 
nitions to a list already in memory. 

Delete a word on the list — Takes words off the 
hst. 

Sort the words — Performs an alphabetical or 
random sort. 

Take the quiz — Gives the vocabulary quiz. 

Save the list of words — Saves the list of words 
in memory to disk or cassette. 
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Load a list of words — Loads a list of words into 
memory from disk or cassette. 

Delete a disk file — Allows the disk user to de- 
lete any file. 

Disk directory — Prints the disk directory onto 
the screen. 

Print the words on the screen — Prints the list 
of words onto the screen. 

Print the words on the printer — Prints out the 
list of words on the printer. 

End this program — Breaks out of the program 
and puts you in BASIC. 

Typing it in. 

Type in MCVQ, just as you would any other BA- 
SIC program. Then check it with Unicheck (see page 
30) to catch all typing errors. Once MCVQ is typed 
in, you can make some of your own modifications 
to it. Here are some suggestions. 

The backgroimd music that's played as you choose 
between menu options can be changed by changing 
the tone data in Line 1720. The length of the new 




for the ATARI 800 or XL 



Cut your programming time from hours to seconds, and have 33 
direct mode commands and functions. All at your fingertips and 
all made easy by the MONKEY WRENCH II. 

The MONKEY WRENCH II plugs easily into the cartridge slot of your 
ATARI and works with the ATARI BASIC 6 00 OR 

Order your MONKEY WRENCH II today and enjoy the v ^7,70 
conveniences of these 33 features: 

• Line numbering 

• Renumbering basic line numbers 

• Deletion of line numbers 



' Variable and current value 

display 
' Location of every string 

occurrence 

String exchange 

Move lines 

Copy lines 
■ Up and down scrolling of 

basic programs 



• Specialline formats and 
page numbering 

• Disk directory display 

• Margins change 

• Home key functions 

• Cursor exchange 

• Upper case lock 

• Hex conversion 

• Decimal conversion 

• Machine language monitor 

• DOS (unctions 

• Function keys 



vass^ 



for your Atari 800, 
600XLor800XL 

A new, simpler, more powerful 

Word Formatter/ Processor for beginners. Only 14.95 




song must be entered in Line 1640 in the variable 
SNGLN. 

In Line 1670, the screen color can be changed by 
changing the COLR variable; the intensity of the let- 
ters can be changed by changing the LUM2 variable; 
and the intensity of the background can be changed 
by changing the LUMl variable. 

To print out the list of vocabulary words on a 40- 
column printer, change the variable FLAG in Line 300 
to equal FO. 

Final words. 

If you happen to press the BREAK key by mistake, 
type GOTO MENU to return to the program. Also, 
notice the number of words MCVQ says you're al- 
lowed to enter when you first run it. This number 
is dependent on how much memory you have. 

Finally, I'd like to say that this program proves that 
strings in Atari BASIC are just as useful as in any 
other BASIC. I've heard many complaints about Atari 
strings, but there's nothing that can't be done through 
shrewd programming techniques. D 

Alfred Filskov is a freshman majoring in Industri- 
al Engineering at North Carolina State University. His 
first exposure to computers was four years ago, in 
Duke University Computer Kamp [DUCK]. His in- 
terest was heightened soon after that, when his grand- 
parents gave him an Atari. 

Listing 1. 



MULTIPLE CHOICE VOCABULARY QUIZ 
BV ALFRED FILSKQU IN OCT. 1984. 



18 REN 

28 REN _ 

38 GOSU B J.D JB 

48 REN Jimnn 

58 TRftP 33333: POKE F752,F1:SETC0L0R Fl 

,Fe,LUN2:5ETC0L0R F2,C0LR,LUN1 

68 ? "W";POKE 82. 7: POSITION FO-Fl:' "I 
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'Create a vocabulary list":? "Add 
to the list":? "Delete a word on the 
list" 

88 ? "Sort the words";? "4Take the qui 
z":? "«Save the list of words" 
98 ? "Load a list Of words":? "Delete 
a disk file";? "Disk directory" 
188 ? "4Print the words on the screen" 
;? "Print the words on the printer":? 
"iEnd this prograH" 

(E 82.F2;P0S IT^0^FB^H^ 

'NOVO up and down to choose, and 
then press the 'fire' button." 

138 POKE KB, F255: POSITION 4,ARHCP):? " 
->";!SOUND F8,SHCNT),F18,F6 
148 FOR A=F1 TO 48: NEXT A: SOUND Fe,F8, 
fSA''Si'*n'*T+Fl:IF NT>SNGLN THEN NT=F1 

i'^LK-^I"'* <''*'=" <"* PEEKCKB>=14 THE 
N POSITION 4,ARHCP}:? " "; ;P=P-CP>F1} 
:GOTO 138 

168 IF STICK CF8) =13 OR PEEKCKB)=1S THE 
N POSITION 4,ARMCP):? " "; ;P=P+CP<12> 
:GOTO 138 
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17e IF STRIGfFei AND PEEKCKB)<>33 THEN 

158 
18e IF NOT 5TRIGCF8) THEN 188 
198 SOUND F8,F58,F18,F8:P0KE KB,F255:? 

•■H*":SOUND F8,F8,Fe,F8 
288 IF P=F1 THEN 348 

218 IF P=F2 AND AHT AND AMT<HAX THEN F 
LAG=F8 SPOKE F752,F8: AI1T=AMT+F1:G0T0 37 
8 

228 IF P=3 AND ANT THEN 498 
238 IF P=4 AND AHT>F1 THEN 618 
248 IF P=5 AND AHT>4 THEN 738 
258 IF P=F6 AND AMT THEN 1178 
268 IF P=7 THEN 1218 
278 IF P=F8 THEN 1278 
288 IF P=9 THEN 1318 

298 IF P=Fie AND AHT THEN AS="S":FLAG= 
Fe:C=F8:G0T0 1378 

388 IF P=ll AND AHT THEN A$="P":TRAP 1 
548 :FLAG=Fl:C=F8: GOTO 1378 
318 IF P=l2 THEN A$="end this prog 
raH":GOSUB 1588: GRAPHICS F8:END 
328 ? "I C annot 40 that ! " ; goto 1558 
338 REN IJ!iTJI;M!riiaa.i 

348 POKE F752,F8;IF ANT THEN AS="creat 
e a nev list":GOSUB 1588 
358 POKE KB,F255:FLAG=F8:ANT=F1:? "K" 
368 IF FLAG THEN ? " Enter the definit 
ion of word tt";ANT;".":? " ";:GOTO 398 
378 ? "+Enter word It"; ANT ;".";: IF ANT> 
5 THEN ? " CType BYE to stopJ"; 
388 ? 

398 INPUT AS: IF LENCA$1>25 THEN ? "Tha 
t word is Hore than 25 characters!":GO 
TO 368 

488 IF A$<>"BYE" OR FLAG THEN 438 
418 IF ANT<F6 THEN ? "YOU have to have 

at least 5 words!": GOTO 368 
428 aht=ant-fi:goto icnu 
438 a$clenca$}+f1}=" 

■ I 

448 US CANT»F58-F49+FLAG»25 , ANT»F58-25+ 

FLAG»253=A$ 

458 FLAG=F1-FLAG:IF NOT FLAG THEN ANT 

=ANT+F1:F0R A=F1 TO F8:? :NEXT A:? "ft 

tttfttf" 

468 IF ANT>NAM THEN 428 

478 GOTO 368 

488 REN QBonacoma 

498 POKE F752 /Fe : ? "Do you want a list 

ing Of the words first CY/N3?"; 

588 GET ttFl,A:IF A=89 THEN ? "Y4V:A$= 

"5":FLAG=F8:C=488:P0KE F752,F1:G0T0 13 

78 

518 IF A<>78 THEN 588 

528 ? "N+" 

538 ? "HhiCh word & definition do you 

want to delete tl-";ANT;">?":MH=-l:T 

RAP 548: INPUT Ml 

548 ? :IF MI>ANT 8R HH<F1 OR HHOlNTfM 

H) THEN ? "Bad nUHber!":GOTO 1558 

558 ? "HORD = ";HSCI«I«F58-F49,IIH«F58-2 

5J;? "DEF. = ";HSCMH«FS8-24,HH«F58) 

568 A$="delete this word":GOSUB 1588 

578 IF HH=AHT then 598 

588 FOR A=WI TO AHT-F1:HSCA«F58-F49, A« 

F5e)=MSCA«F58+Fl) :NEXT A 

598 ANT= ANT-F1SG0T KEHU 

688 REN fcIil;ia!M;iaa 

618 ? "Do Sfou want an CA) Iphabetical o 

r a fRlandoH sort?"; 

628 GET ttFl,A:? CHRSCA}:? :IF A=65 THE 

N 658 

638 IF A=82 THEN 788 

648 ? "NO ChOice!":GOTO 1558 

658 IF ANT>28 THEN ? "This Will take a 

pprox. ";INTCANT«ANT/68};" secs.":FeR 

A=F1 TO F255:HEKT A 



668 POKE 559, F8: FOR A=F1 TO AHT-F1:C=A 

«F58;F0H^B=A+F1 TO AHT 

678 IF HSCC-F49,C}<=H$tB«F58-F49,B«F58 

' THEN 690 

688 AS=:H$ CBKF58-F49) : HS CBNF58-F49 , B»F5 

83 =H$ CC-F49] : H$ f C-F49 , C) =AS 

698 NEXT B:NEXT A:P0k£ 559, 34: GOTO IKN 

798 ? "Working. ..": FOR A=F1 TO ANT:B=I 
NT CRND CF1)»ANT+F13 

718 A$=HSCA«F58-F49) :MSCA«F58-F49, A«F5 
83 =H$ CB«F58-F493 : HS (B)(F58-F49 , BKF583 =A 
$:NEXT A ;G8TQ NEN U 
728 REH SE^tBSE 

738 FOR A=F1 TO AHT : RIGHT CA3=F8: NEXT A 
: NET=AHT : GUE5S=F8 : HH=F1 
748 ? "You are about to take the quiz. 
You mist choose the correct definit 
ions" 

758 ? "Of the ";aht;" words I have in 
MeHory." 

768 ? "4Choose the answers using the j 
oystick.lf you do not know an answer, 
choose" 

778 ? "the last option which counts on 
ly 1/2 a Hiss." 

788 ? "+Press"E5C during the quiz to r 
eturn to the Menu.":? :GOSUB FIRE 

799 ? "H";SETC0L0 R F1,F9.L UN1;IF NET=F 
i THEN ? " H!it»4-«ii;ijig!l.-i«riraa 
I": GOTO 819 

888 ? " THERE ARE ";NET;" HORDS LEFT T 

DEFINE." 

818 ? "+ DEFINE: ";H$CHHMF58-F49,HH 

«F5e-253 :P8KE 82,F18:? ;? :GUESS=GUESS 

♦Fl : D=INT CRND CF1>»5+F1J 

828 FOR A=F1 TO 5:USEDCA3=8:NEXT A: FOR 

A=F1 TO 5: IF A=D THEN ? H$CHHKF58-24, 
HH»F583 :GOTO 868 

838 C=INT CRND CF13 KAHT+F13 : FLAG=F8 : FOR 
B=F1 TO 5: IF USEDCB3=C THEN FLAG=F1 
848 NEXT B:IF FLAG OR C=HH THEN 838 
858 USEDCA3=C:? ll5CC«F58-24,C«F583 
868 NEXT A 

878 ? "DO NOT KNOM":POKE 82,F2:SETC0L0 
R F1,F0,LUH2:P=F8:P0KE 77, F8 
888 POKE KB,F255:P0SITI0N 7,P:? "->";: 
SOUND F8,SNfNT3,F18,Fe 

898 FOR A=F1 TO 28: NEXT A: SOUND F8,F8, 
F8,F8:NT=NT+Fl:IF NT>SNGLN THEN NT=F1 
988 IF STICK fF83 =14 OR PEEKCKB3=14 THE 
N POSITION 7,P:? " ";:P=P-CP>F63 :GOTO 

888 
918 IF STICK CF83 =13 8R PEEKCKB3=15 THE 
N POSITION 7,P:? " "; :P=P+CP<11J :GOTO 

888 
928 IF PEEKCKB3=28 THEN P=5:G0T0 HENU 
938 IF STRIGCF83 AND PEEKfKB3<>33 THEN 

988 
948 IF NOT STRIG(F83 THEN 948 
958 P=P-5:IF P=F6 THEN SOUND F8,38,F10 
,F8:F0R A=F1 TO F8:NEXT A:GUESS=GUESS- 
8. 5: GOTO 1188 
968 IF P OD T HEN 1888 
978 REH IdUlUU 

988 POSITION 11,14:? "YOU ARE RIGHT!!! 
": RESTORE 1818 

998 FOR A=F1 TO F6:READ B,C: SOUND F9,B 
,Fie,Fe:SOUND Fl,BHhFl,F18,F6 
1889 FOR D=F1 TO C«12:NEXT D:NEXT A: SO 
UND F9,F9,F9,F8:S0UND F1,F8,F8,F8 
1818 DATA 148,1,118,1,98,1,75,2,98,1,7 

1828 NET=NET-Fl: RIGHT CI«H3=Fl: IF NET TH 

EN 1128 

1839 POSITIO N F6,16:? " ti'iilWrMlJ JaJiriisi!! 
U>»i!ld>illiiai " : AS=STR$ f INT C C2«AHT-GUESS 
} /AHT»188+8 . 53 3 : AS CLEN (AS3 +13 ="X" 
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WE DINl BDILD 
MOrn VEHItlES. 
IF WE DID, 
IT WOILDNI BE 
A LITTLE. FilEICN 
TWD-SEAHR. 

IT WIDLD BE 
A TODGR 
U-WHEELER Wni 





a solid 



CAMCITY. 



Meet Astra "Big D", the standard by 
winlch every other dish drive will be 
measured. A double-sided, single or 
double density dual disk drive. 

Mo bells, lights and whistles. Just 
dependable workhorse that can 
carry the load. Twice the stor- 
age capacity of other units — 
720 KBYTES, dearly three- 
quarters of a nnil- 
lion characters of 

Information. 

1 
Astra "Big D" 

offers the 

advantages of 



two drives and true double-density in 
one low-priced unit. All Big D's are now 
supplied with the latest version of 
"T0PD05". This D.0.5. takes full advant- 
age of the Big D "QUAD" density 
capabilities. 

Any serious business application 
demands such a unit. Its improved 
circuitry, rotary doors and direct drive 
motors provide for a more reliable, 
quieter operation. 

Software programs such as word 
processing, data base management, 
spread sheet analysis and mailing lists 
are made more powerful, and, at the 
same time, easier to use if you have 
two disk drives. 

And it's compatible with Atari's new ^E 
Series as well as the original and inter- 
mediate computers, 400, 800, 600^;L, 
800^;L and 1200^;L 

rind out more about Astra's "Big D" 
reliable performance and heavy load 
carrying capacity by contacting your 
nearest dealer or distributor. 
Call (714) 549-2141. 



nSTRfl SVST6MS, INC. 



2500 South ralrview/UnIt L 
Santa Ana, California 92704 
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1040 ? "♦ 



YOUR SCORE IS": FOR A= 



FO TO 23:S0UND F0.195-fl«F8,F10,F8:P0SI 

TIOM 0,17:? •■ ";a5; 

lOSO B=SINCF1):NEXT A:SOUND Fe,FO,FO,F 

o:for A=Fe to 8e:NEXT A: position 24, 17 
:? " ♦*•**■«■♦" ;A5;".*" 
1060 SOUND F8,210,Fie,F10:B=FlAFl:S0UN 
D FO.FO,F O,FO: GOSUB FIRE :P=5: GOTO NENU 
1070 REH \S^B 

1080 POSITION 11,14:? "YOU ARE HRONG.. 
.":SOUND Fe,2e0,F10,F6:F0R A=F1 TO 40: 
NEXT A 

lose SOUND Fe,241,F18,F6:F0R A=F1 TO 6 
8: NEXT A 

1100 SOUND Fe,Fe,Fe,FO: POSITION F2,16: 
? "THE RIGHT ANSHER IS:":? " 
" ; 1^ ttW *F50-24 . im*F5 03 

1130 IF A>AHT THEN A=F1 

1140 IF RIGHT CA) THEN A=A+F1:G0T0 1130 
1158 HH=A :? : GQSUB FIRE: GOTO 798 
1168 REN gSEB 

1178 POKE F752.Fe:? "Hhat is the full 
nane of the file to save"; : INPUT A$ 
1188 TRAP 1548:CL0SE ttF2:0PEN ttF2,F8,F 
8, A?:? "4Saving. . ."; 

use FOR A=F1 TO AHT:? ttF2;H$ CA«F50-F4 
9.A*F503: NEXT A: CLOSE ttF2:G0T0 HENU 
1288 REH \M!ESS 

1218 IF AMT THEN A$="]oad a file":GOS 
UB 1588 

1228 POKE F752,F8:? "4Miat is the full 
naMe of the file to load"; :INPUT A$ 
1238 TRAP 1548: CLOSE ttF2:0PEN ttF2,4,F0 
,AS:? "4Loading. . ."::TRAP 125e:AHT=Fe 
1248 INPUT ttF2;AS:AHT=ANT+Fl:H5fAHT«F5 
8-F49)=A$:IF AMT<HAX THEN 1248 
1258 CLOS E ltF2:G0TQ tCNU 

1260 REH i>iii*i5«*nra 

1278 P8KE F752.F8:? "Hhat is the full 
nane of the file to delete"; :INPUT AS 
:IF A$="" THEN GOTO ICNU 
1280 ? "4Are you sure that you want to 

delete ";A$;" CY=YESJ?"; :GOSUB 1510 
1290 TRAP 1540:? "4Erasing. . ."; :XI0 33 
.ttF2.F8.F 8.AS:GQT0 HENU 

1300 REH mijkjiMiVj 

1318 ? " This is the disk directory 
:":POKE 82,F10:? :TRAP 1540 
1320 CLOSE ttF2:0PEN ltF2,F6, FO,"D:».»" : 
A=F2 

1330 INPUT ttF2,A$:? AS: IF ASC5,163="FR 
EE SECTORS" THEN POKE 82, F2: CLOSE ttF2: 
GOSUB FIRE: GOTO NENU 

1340 A=A4F1:IF A/20=INTCA/2e) THEN ? : 
? " Press "fire^MGOSUB 1580:? :A=F8 
1358 GOTO 1338 
1368 REH jjUuCU 

1378 ? " Press 'fire' to delay and re- 
start printing, and press ESC to ab 
ort.": GOSUB FIRE 

1388 CLOSE ttF2:0PEN ttF2,F8,Fe, AS:SETCO 
LOR F1,F8,LUH2:SETC0L0R F2,C0LR,LUN1:P 
OKE F752,Fl:P0KE KB,F255 
1390 FOR D=F1 TO AHT:? «F2;D;". ";MSCD 
«F58-F49,D«F5e-253 ; 
1488 IF NOT FLAG THEN ? ttF2:? ttF2;" 

1418 ? ttF2;"-"; 

1428 ? ttF2;H$CD«F58-24,D«F50} 

1430 IF PEEKCKB)=28 THEN GOTO HENU 

1440 IF PEEKCKB)=33 OR NOT STRIGCFO) 

THEN GOSUB 1610:6010 1470 

1450 NEXT D:IF FLAG+C THEN GOTO ICNU+C 

1460 GOSUB FIRE: GOTO HENU 

1478 IF NOT STRIGfFO) THEN 1478 

1488 GOSUB lS88:GaT0 1450 



1498 REH rilM-lJUTTI 

1580 ? :? "Are you sure that you want 

to ";AS;" CY=YESJ?"; 

1518 POKE KB,F255:GET ttFl,B:IF B=89 TH 

EN SOUND F0,F50,F10,F8:? "Y": A=F1af1:S 

OUND F0,Fe,F0,F8: RETURN 

1528 SOUND F0,238,F18,F8:? "N":POP :A=: 

FlAFl : SOU ND JFQ ■ FO . FO . FB : GOTO HENU 

1530 REH HiiilAiaj'WiTf] 

1548 POKE 82, F2:? "iliDevice access err 

or!" 

1558 SOUND F8,248,F18,F8:F0R A=F1 TO 6 
e:NEXT A:SOUND F8,F8,F8,F8:F0R A=F1 TO 

168: NEXT A:GOTC 

1560 REH 

1570 ? :? " Press the 'fire' butt 

on" 

1580 POKE KB,F25S 

1590 IF PEEKCKB3<>33 AND STRIGCFO) THE 

N 1598 

1680 IF NOT STRIGCFei THEN 1688 

1618 SOUND Fe,48,Fie,F8:P0KE KB,F255:A 

=SINCF11: SOUND F0,Fe,FO,Fe:RETUiiN 

1628 REH fcVijIilyl 

1638 F8=8:Fl=l : F2=2 : F6=6 : F8=8 : F18=18 : F 

49=49 : F58=58 : F255=255 : F752=752 

1640 NENU=5e : FIRE=157e : AHT=FO : KB=764 : S 

NGLN=25 

1658 HAX=INTCFRECF8}/F58}-74:IF HAX>40 

THEN HAX=4e8 

1668 GRAPHICS Fe:POKE 82,F2:P0KE 83,39 

:POKE F752,Fl:? : CLOSE ttFl:OPEN ttFl,4, 

FO "K" 

1678 LUH1=8:LUH2=0:C0LR=15:SETC0L0R Fl 

,F8,LUH2:SETC0L0R F2,C0LR,LUH1 

1680 DIH HSCHAX«F5e},ARHC12),ASCF5e},U 

SED C5) , RIGHT (HAX) , SN CSNGLN) 

1698 RESTORE 1708: FOR A=F1 TO 12: READ 

B:ARMCA3=B:NEXT A:P=7 

1700 DATA 3,4,5,6,8,18,11,12,13,15,16, 

18 

1718 FOR A=F1 TO SNGLN:READ B:SNCA)=B: 

NEXT A:NT=F1 

1728 DATA 81,96,121,96,81,68,47,53,68, 

96,85,81,81,81,47,53,68,64,72,64,68,60 

,81,96,12' 

1730 REH 

1748 AS=" 

ES":FOR A=F1 lu ;sii 

1750 SOUND F0,288-F6«A,F18,F6: POSITION 

5,F2:? ASC31-A,31l:NEXT A 
1760 ? "* BY ALFRED FILSKOV IN OCT., 

1984":S0UND F0,F8,F8,Fe 
1778 ? "l^This prograM allows you to e 
nter up to ";HAX;" words and definit 
ions." 

1780 ? "4lt will then quiz you on the 
words and give you a score. The qu 
iz is in Multiple choice fornat." 
1790 ? "4TO take the quiz you will nee 
d a joystick in port 1. You can 
also use" 

1808 ? ttF6;"the t, 4, and SPACE keys a 
s up, down, and 'fire'.":? :GOTO FIRE 



CHECKSUM DATA. 

(see page 30} 

18 DATA 516,944,12,818,872,43,51,885,7 

86,447,251,915,48,588,538,7538 

168 DATA 471,319,987,613,488,782,541,9 

89,599,573,485,748,416,86,27,7964 
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ATARI UPGRADES 
FROM NEWELL INDUSTRIES 

FASTCHIP - ATARI 400/800 was $41 .95 - Only $1 9.95 
A custom floating point ROM that increases ttie speed 
of ttie computer by as mucti as four times. It is directly 
pin compatible witin tine existing ROM. 
RAMROD - ATARI 800 was $1 89.95 - Only $1 1 9.95 
FEATURES: 

OSN operating system in EPROM, grapfiic modes 0- 
15, programmable cassette baud rates, enhanced 
l<eyboard, cartridge control on power up, up to two 
operating systems on board, will accept standard 
roms. 

OMNIMON machine language monitor. 
Up to 1 6K of ROM for use at COOO. 
Up to 4K of RAM for use at COOO. 
RAMROD, W/8K OMNIMON OR 

8KOMNIVIEW(80COL.) S1 34.90 

RAMROD with OMNIVIEW $119.90 

RAMROD with OSN O.S. only $89.95 

RAMROD W/O OMNIMON & OSN O. 8. $69.95 

OMNIMON piggyback board with 

OMNIMON S69.95 

4K OMNIVIEW ENHANCEMENT(80 COL.) $29.95 
8K OMNIVIEW ENCHANCEMENT 

(OMNIMON & OMNIVIEW) $44.95 

8K OMNIMON ENCHANCEMENT $44.95 

8K OMNIDOS (ROMDOS & OMNIVIEW) $59.95 

MYDOS 3.x DISK OPERATING SYSTEM $29.95 

This disl< operating system is compatible with 2. OS, 
but has the serious user in mind. Supports all 5 1/4 & 8 
inch drives. Si ngle&doublesided&density, 35,40.77, 
80 tracks. Allows keyboard configuration of all drives. 
Duplicate with or without format, all or specified 
sectors. Initialize disk with or without format. 
Unlimited file names. Automatic density select on 
read or write. Many, many more features. Uses less 
memory than 2. OS 

ROMDOS 800 

(For use in RAMROD or equiv.) $39.95 

All the features of MYDOS in ROM. Gives you approx. 
4K of extra RAM. 

SBM (Small Business Management) $99 95 

This system was developed to give the small business 
or retail store the tools to computerize their 
operations. SBM is an inventory control and point of 
sale program that also has otherfeatures such as mail 
labels for accounts, purchase orders, invoicing, and 
many more. Prints invoices, purchase orders, inven- 
tory, sales, account reports and more. 

RAMROD XL -for 800 XL/1 30XE $99.95 

Allows the use of three different operating systems. 
Comes with OSNXL operating system (solves most 
incompatibility problems), FASTCHIP floating point 
routines, and OMNIMONXL in ROM. 

OMNIVIEWXL -FOR 600/800XL/1 30XE $59.95 

(WITH RAMROD XL) $45 00 

Now get 80 columns with your 800XL. Compatible 
with LJK products, BASIC. AIR 8000 in CPM, etc. 
Enter 80 column mode easily, just press console 
keys. 

OMNIVIEWXE- FOR 130XE $59.95 

(WITH RAMROD XL) $45.00 

Same as OMNIVIEWXL, except cassette handlers 
have been replaced with RAMDISK handlers to 
support the extra memory of the 
130XE. 

SD/DD 1 30XE SECTOR COPIER - 1 30XE $1 7 95 

Designed specifically for the 128K 130XE. This 
program supports both single & double density drives 
up to 2880 sectors per disk. Copies a full disk in just 
one pass. Make multiple copies while reading the 
source disk just once. 

TO ORDER: Send check or M.O. to Newell Industries, 
3340 Nottingham Lane, Piano, Tx 75074 or call (214) 
423-1781 (no collect calls). COD orders add S1.90. 
Orders under $25.00 add $2.00 shipping. Texas resi- 
dents add 6Vb % sales tax. Or contact your nearest 
dealer. 

CIRCLE #110 ON READER SERVICE CARD 




Vocabulary Quiz continued 



310 DATA 891,289,616,718,932,315,895,9 

13,383,150,119,411,289,43,149,6953 

468 DATA 16,732,641,142,229,718,453,84 

5,212,623,5,81,421,434,97,5649 

618 DATA 56,199,431,162,157,628,707,27 

4,298,386,238,712,245,843,467,5795 

760 DATA 923,849,880,46,26.756,197,511 

,539,336,744,517,565,523,614,7946 

918 DATA 574,265,324,995,178,777,254,9 

40,394,839,266,875,244,786,643,8354 

1060 DATA 36,403,343,881,462,569,433,7 

97,497,162,48,66,598,250,50,5595 

1210 DATA 986,448,449,251,218,660,619, 

465,62,941,109,4,910,547,719,7372 

1360 DATA 430,650,910,611,284,669,75,5 

80,721,33,741,871,377,661,931,8544 

1510 DATA 417,689,69,486,119,570,831,1 

68,286,858,801,447,840,913,618,8104 

1660 DATA 22.82,869,462,428,438,634,26 

7,473,959,531,174,979,21,398,6737 
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DON'T MISS A SINGLE ISSUE. 






Lei us know your new address right away. At- 






tach 


an old mailing label in the space provided 






and 


print your new address where indicated. 
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YOUR SUBSCRIPTION? 






Check the appropriate boxes below: 
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ew subscription. Please allow 4-8 






weeks for your (Irst copy to be mailed 
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enewal subscription. Please include 






a current address label to Insure prompt 
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proper extension. D 1 -year $28.00. 






Ttiis 


rate limited to the U.S.A. and its 






possessions. D Payment enclosed or 
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The World's Greatest Printer Utility! 



MegaFont][ + 

The Complete Program Lister 

and Graphics Dumper 

by Richard Rognlie and 

««^ III JL «i ~ Randy Dellinger 

"... a very good program . . . better than ever . . ." 

ACE Newsletter 

MORE FONTS — FASTER DUMP — FONT UPLOADER* 

Allows NEC, Prowrlter, Epson (w/Graftrax, RX-80, FX-80), RIteman, Gemini, Mannes- 
mann Tally, Panasonic & other compatible dot matrix printers to dump Graptiics 7+ and 
8 screens in 3 sizes (4 on Epson) and print all control and inverse characters in fonts 
provided or use your own. Hew Features: Adjustable margins. FAST LISTER, Font 
uploader*, adjustable line spacing. Font Splicer (combine 2 fonts together). 
'Prowrlter 8510AP w/chip, Epson FX-80, Panasonic KX-P1092, Citizen 20 and 
compatibles 

48K disk Only $24.95 

MegaFont PC (for IBM PC, PC jr & most PC compatibles) $39.95 



Let Your Imagination Run Free 



Page Designer 

by Len Dorfman and Dennis Young 

"... a pretty nifty package . . ." Current Notes 

Page Designer lets you design a full page printout (8'/? x 11 ) on-screen and then save it 
to disk. Combine text, graphics and borders. Edit on-screen in either 40 or 80 columns. 
Fontstyles can be mixed in the40 column mode. All graphic and control characters are 
displayed and printed PLUS we've included specially designed border characters. Use 
Page Designer to add text to pictures you've created (Micropainter, Koalapad, Atari 
Artist). Drawing mode let's you add finishing touches (e.g, circles and spheres). Great 
for creating ads, reports, newsletters or for dressing up letters. 

48K disk Only $29.95 

For Epson, Gemini, Panasonic, Prowrlter, NEC and compatible dot matrix printers. 



Resolution to the MAX! 
491,520 pixels per page 



Typesetter 

by Dennis Young and Len Dorfman 

Now your Atari can have higher resolution to the printer than the 
Macintosh Tlie48K version can have resolution up to 704 x 624 
pixels (768 X 640 on the 130 XE version). Typesetter accom- 
plishes this feat by letting you scroll over multiple graphics 6 
screens. You can control the style, height and width (32 sizes) of 
characters. Type in any direction — forward, backward, up and 
down. You have the flexibility to mix graphics, text and graphic 
characters. Sketch Pad lets you create icons and allows you to 
copy them or any part of the screen anywhere. Used in conjunc- 
tion with Page Designer, you can add detail to standard Graphics 
8 screens. This program is for ALL Atari enthusiasts who've 
dreamed of having the artistic capability of the Macintosh. Light 
years ahead of any other Atari graphics program. 

48Kdisk Only $34.95 

Attention: 130 XE version Included 
For Epson, Gemini, Panasonic, Prowrlter, NEC's and compatible 
dot matrix printers. 

Jennifer Brabson's artwork 3 disks for $20.00 

For use with MegaFont ]{+. Page Designer and Typesetter 

"Chip" for Prowrlter 851 OA adds 2K buffer $15.00 



The Only Serious Database on the Atari 




Add $2.00 for shipping and handling. C.O.D. orders, additional fees. Virginia 
residents please add 4% sales tax. Send check or money order to: 
CIRCLE #111 ON READER SERVICE CARD 




XLENT MegaFiler 

by Jerry Kwit 




"I don't believe you can get better value for your money . . ." 
ACE Newsletter 

"Its claim to fame Is the large amounts of records it can handle." 
ANALOG 

MegaFiler is the NLY database on the Atari that is very powerful, easy to use. and can 
handle over 1 ,500 records. Features found on expensive databases include: modifiable 
database structure without data loss, multiple level sorting, user defined formula for 
data entry. Report Generator with subtotaling of fields, subsidiary file creation and 
Label Generator. NOW unprotected so you can use it with your favorite DOS. 

48K disk Only $29.95 

ComlnG soon . . . special version for the 130 XE. 



Explore Your Inner Self 



HYPNOSIS 

witfi Brainwave Synchronization 
by Gene Levine 

The most significant self-improvement program. Designed for 
anyone who is interested in hypnosis, relaxation, or self-im- 
provemenL This program replaces the synchronizing strobes 
that can cost hundreds of dollars. Seven screens pulsate at 
speeds that you can adjust with paddles or keyboard. Audio 
tapes may be played using the Atari cassette recorder. Create 
your own self-improvement tapes to be used with this program. 
Great for those evenings when you want to relax. 
48K disk Only $29.95 



The Trivia Construction Set 



Trivia Mania 

by Jan Iverson 

Once played, most trivia games become triviat Trivia Mania 
includes 1,800 questions to start PLUS an easy to use game 
editor. You can create your own trivia games — computers, 
foreign culture, vampires — any area that is your special 
interest Ideal for use by parents, teachers, students and trivia 
buffs. A fun and educational utility 
48K (2 double-sided disks) Only $29.95 





Dealer Inquiries Welcome 



XLENT Software 

P.O. Box 5228, Dept. B 
Springfield, Virginia 22150 

24 Hour Order Ptione (703) 644-8881 





Science 
Arcade 



The Franklin Institute 

Science Museum 

and Atari 



by William J. Rooney, Jr. 

If Benjamin Franklin were alive today, 
he would more than likely be involved 
in the information revolution. He loved 
to tinker and see what practical use he 
could get out of the latest technology; he 
surely would have been the first on his 
block with a personal computer hobby 
kit. 

But, since Dr. Franklin isn't around, 
it falls to the Franklin Institute Science 
Museum in Philadelphia to carry on his 
legacy. One of their latest exhibits is 
Science Arcade, a room where Atari 
800s are used in making science learn- 
ing fun, in a format that's appealing to 
today's museum audience. 

The Franldin Institute was one of the 
fii'st science museums built in the Unit- 
ed States. It stresses hands-on partici- 
pation in science activities, and its staff 
firmly believes that science education 
can be enjoyable. 

Lately, science education in this coun- 
try has faced some stiff criticism. A na- 
tional coiTunission took a look at Amer- 
ican schools and found them lacking. At 
the same time, the growing use of com- 
puters in schools has created a real chal- 
lenge for teachers. 



Mow do they learn enough about com- 
puters to teach their students properly? 
How do they keep from falling into the 
trap that encourages them to use pro- 
grams that try to teach concepts while 
disguised as fast-paced shoot-'em-ups? 
Or multiple choice programs that come 
with pretty graphics and are dubbed 
"games"? 

The former encourage students to go 
for high scores without worrying about 
what they're learning. The latter get stu- 
dents to quickly memorize the correct 
letter of the answer; again, without real- 
ly knowing what they've answered. 

The Franklin Institute has come to 
grips with these and other problems in 
Science Arcade, which gives a glimpse 
of some ways the computer can be used 
effectively in education. 

"We worked on so many projects in 
which the computer was used for in- 
structional purposes that it seemed we 
could add a little entertainment to the 
instruction and really have an exciting 
program. After all, that's what the Insti- 
tute is all about," said Minda Borun, 
head of the Computer Activities Group. 
The result is Science Arcade, a collec- 
tion of educational computer games that 
tie in with science principles and con- 
tent inatter of exhibits in the Museum. 



For instance, non-sailors wlio've al- 
ways wondered how sailboats can make 
headway into the wind can find out in 
a game called "Microsailing." Using a 
joystick for a rudder, you sail your boat 
around a com'se, battling the wind and 
waves all the way. For the more profi- 
cient seaman, there's an option that uses 
official yachting rules and assesses pen- 
alties for infractions. 

A classic problem faced by trainmen 
since the dawn of the "iron horse" has 
been the switching. . . how to get all 
those boxcars in the proper order before 
pulling out of the switching yard. "Text 
Train" addresses that dilemma, using 
letters instead of boxcars. The player 
must form a word using letter "boxcars" 
scattered randomly around the track. 
But how do you get the engine backed 
up to the proper cars? And how do you 
get them in the right order? Players can 
find out in "Text Train." 

If you must have a space game, there's 
the "Lunar Lander." Try to land a lunar 
module gently on the Moon's surface by 
firing the retro-rockets at just the right 
time. 

For those not interested in space trav- 
el, how about a leisurely game of "Pool"? 
This game is truly astomiding in the way 
it simulates the action of pool balls as 
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they collide, following the real laws of 
momentum. Moms and dads can relax 
with this one while the kids are off play- 
ing "Lunar Lander." 

For those who enjoy math and logic, 
there are "Golf Classic," "Hurkle" and 
an extremely challenging game called 
"Snark Hunt." This last game draws on 
Lewis Carroll's writings to fire "vorpal 
beams" into a box to track down hidden 
"snarks." "Laser Maze" is a similar game, 
with the difference that, here, the prob- 
lem is to guess where the beam's going 
to come out, instead of finding where 
something is hidden. 

Two of the more innovative games are 
"Parachuter" — where the object is to 
open the chute in time and land on a 
target — and "Rocket Mail." Legend has 
it (and the Institute staff swears that this 
is true) that in the 1940s, a small village 
snuggled deep in the Austrian Alps re- 
ceived its mail via a rocket shot over the 
mountains to a clearing in the woods. 

The Institute has recreated this diffi- 
cult assignment by varying the wind 
speed and weight of the rocket (it was 
probably heavier around Christmas). 
TYie p\ayer has to decide how much fuel 
to use and at what angle to shoot. It's a 
very enjoyable game, with a beautiful 
drawing of the Alps to boot. 



Project Director Borun explained the 
stringent criteria that her staff applied 
when looking for games for the Arcade. 
"We wanted to create a facility in which 
visitors could play computer games that 
didn't involve blasting aliens. Nonvio- 
lence was a high priority. Of course, we 
were looking for games that were educa- 
tional and reinforced skills other than 
hand-eye coordination. 

"Both educational and recreational 
software is available, but, as w^e quickly 
discovered, it's a rarity to find a good 
combination of the two. Finally, all of 
the games had to have science content 
which connected with our exhibits." 

As long-time Atari users may have no- 
ticed, the old Atari Program Exchange 
was a great source of materials for the 
Arcade, as were other third-party soft- 
ware companies. In addition, some of 
the games were translated from other 
computers or written from scratch. 

But Science Arcade is only the latest 
application of computers at the Frank- 
lin Institute. Visitors to the Museum find 
many computers prominently placed 
and ingeniously used to help extend en- 
joyment of the exhibits. 

Across the hall from the Arcade is the 
Computer Activities Center, a compan- 
ion project to Science Arcade. In this 



special computer classroom, visitors can 
acquire the necessaiy skills to use com- 
puters effectively, in a wide variety of 
courses that range from "Getting Into It," 
to BASIC or Logo programming, to spe- 
cific applications like spreadsheets or 
word processing. 

Right in the same area is one of five 
"Poor Richard's Computer" terminals. 
There's at least one of these on each 
floor, offering information about the 
Museum and quizzing visitors about the 
exhibits on that floor. 

In the Shipbuilding Exhibit is a game 
that should be in every classroom. "Sea 
Trader" asks you to imagine that you're 
a sea trader in 1772. Your brother-in-law 
has loaned you 2,000 English pounds to 
get started. You're then faced with nasty 
weather, shipwrecks, pirates and other 
tribulations. Keep a close eye on your 
ledger, though, because it wasn't easy to 
earn a living from the sea in those days. 

Perhaps the most ambitious of the 
computer projects in the building is 
"Flying Facts" in Aviation Hall. It could 
easily be used in any library. With over 
600 screens of information about flight, 
most of them illustrated, arranged on 3 
levels of difficulty and covering 4 main 
topics, a visitor could spend a great deal 
of time in front of one of these terminals. 
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Science Arcade continued 




And, to discover what's going on in- 
side all these computers, there's "Secrets 
of the Computer," which offers a clear, 
illustrated explanation of what a com- 
puter can do and how it works. 

Ben Franklin may not be around any 
more, but his spirit is alive and well at 
the Franklin Institute. Any visit to Phil- 
adelphia is incomplete without a stop at 
this stimulating museum. . .especially 
if you want to see unique computer ap- 
plications in action. D 

William /. Rooney, ]r. is an histructor 
and Computer Systems Coordinator in 
(he Computer Activities Division of the 
Education Department of the Franklin 
Institute Science IVIuseum. 



Some pro 


gram listings 


reproduced in ANALOG 


Computing may 


contain "strange" characters 


not shown 


on the keyboards of earlier Atari 


Tiodels. These are special characters which use the CTRL 


, ESC and 'ATARI 


LOGO" (inverse) keys. 


Shown below is a list of these characters 


and the keystrokes used to 


get them. 
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TUTORIAL 



Q 




by Karl E. Wiegers 



Part 1 of Assemble Some Sound (issue 33) present- 
ed fundamental concepts of sound generation on the 
Atari and illustrated basic audio techniques in as- 
sembly language. The final example showed how to 
play a simple tune in three-part harmony. Now, Part 
2 explores some of the more elaborate sound capa- 
bilities. Light torch. Grasp keyboard. FoJJowme. . . 

Macro sound. 

So far, all of these examples have been written in 
Atari Assembler Editor format. Those of you using 
macro assemblers may detect the possibility of using 
a macro to eliminate the tedium of setting up each 
register whenever you want sound. Herewith, see 
Listing 1. 

This example defines a SOUND macro which emu- 
lates the SOUND statement used in Atari Microsoft 
BASIC. It's just like the SOUND statement in regu- 
lar Atari BASIC, but has a duration parameter added 
(in jiffies, of course). 

This macro is defined for use with the Atari Mac- 
ro Assembler, but it could be adapted for use with 
other macro assemblers. To use the macro, first in- 
clude it in a SYSTEXT file or other source file in your 
own program. Then, to invoke it, use this format: 



SOUND voice,pitch.distortion,volume,duration 

The appropriate object code will be generated auto- 
matically. Don't forget to include the DELAY subrou- 
tine somewhere in your source program. A very short 
sample program is included in Listing 1, which uses 
this macro to play an undistorted middle C on audio 
channel 1 for 1.25 seconds (75 jiffies) at volume 8. 

This SOUND macro sets the AUDFX register for 
the indicated voice, combines the specified distor- 
tion and volume, and stores the result in the correct 
AUDCX register, then sets the timer variable based 
on your duration. 

After calling the DELAY subroutine, the macro 
stores a in the frequency register to shut off the 
sound. Since the macro generates a new block of ob- 
ject code every time it is invoked, it's not ideal for 
use in a loop. However, this SOUND macro is very 
convenient for individual tones or short sequences. 
Plus, you could put the macro call in a subroutine 
and call it from elsewhere in a program with a JSR 
instruction, as often as necessary. 

Using the VBI. 

By now, you've probably thought that it's a shame 
to waste all the computing power of the Atari on a 
silly delay loop, simply doing nothing until we're done 
playing the sounds we want. Fortunately, the Atari 
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designers gave us an alternative. 

We can take advantage of the precisely timed ver- 
tical blank interval to insert our own sound generat- 
ing program as a vertical blank interrupt or VBI. 
During the vertical blank interval every sixtieth of a 
second, the computer does some housekeeping chores, 
and we can easily add our own tasks to that ritual. 
This way, the mainstream processing time of the com- 
puter goes on as usual, with our sound effects con- 
tinuing in the background. 

The use of a VBI is especially suited for programs 
in which repeating background music is desired, or 
programs which use continuous sound effects, such 
as the droning of engines or the relentless marching 
of alien invaders. 

Listing 2 shows how to do it. This illustration con- 
tains a VBI suitable for use in a road racing game, 
in which the movement of a joystick plugged into port 
1 is the means of adjusting tlie frequency of a distorted 
sound effect resembling a revving car engine. 

As usual, the main program initializes POKEY and 



ULTIMATE STORAGE 

Organize your ANALOG Computing library with sturdy, custom-made 
binders and files in deep blue leatherette with embossed silver letter- 
ing, labels included. One binder or box file holds 12 issues (1 year). 




The ANALOG Computing binder opens flat. Priced at only $8.50 
each— 3 binders for $24.75 or 6 binders for $48.00, postage paid. 
The ANALOG Computing file is compact, with easy access. Only 
$6.95 each— 3 files for $20.00 or 6 files for $36.00, postage paid. 
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sets AUDFl and AUDF2 (Lines 230-310). A distortion 
level of 6 gives a pretty good imitation of a race car 
engine. Since we can't read the POKEY registers to 
see what the current value of AUDFl is, we've defined 
another variable called PITCH, which will always 
equal the contents of AUDFl. The equates also define 
variables needed to read the joystick deflection and 
to set up the VBI. 

Lines 370-400 show how to begin a VBI routine. 
The low byte of the starting memory location of the 
VBI routine itself is stored in the Y-register of the 
6502 microprocessor; the corresponding high byte 
goes into the X-register; and a value of 7 is placed in 
the accumulator. 

After this, a JSR operation to the vertical blank en- 
try point at hex location $E45C turns on our own 
VBI— you'll have to press SYSTEM RESET to turn 
it off in this example. 

The procedure shown here establishes a "deferred" 
VBI, as opposed to an "immediate" VBI, which is han- 
dled exactly tlie same, except tliat a value of 6 is placed 
in the accumulator before the JSR SETVBV instruc- 
tion. The deferred VBI is best for most applications. 

The VBI routine itself is fomid in Lines 450-660. 
This program simply reads the joystick every sixtieth 
of a second and modifies the frequency in AUDFl ac- 
cordingly. If the stick is deflected forward, then the 
pitch value is decreased to get a higher frequency 
(remember that inverse relationsliip). Conversely, pull- 
ing the joystick toward you lowers the frequency, as 
if the car is slowing down. 

Checks are included to make sure that the value in 
AUDFl is always between 40 and 255. To RUN this 
program, I had to use the TRACE feature of the Atari 
Assembler Editor debugger. Simply RUNning the as- 
sembled program with a G3000 command in the 
debugger turned on the sound , but didn't enable the 
VBI properly for some reason. 

So use a T3000 instruction after assembling and en- 
tering the debugger, and play with the joystick. Can't 
you just visualize the Grand Prix action which should 
accompany that roar? Using sound effects in a VBI 
like this adds a lot to a game, without distracting the 
microprocessor from all the other action going on. 

More frequencies. 

The limitations of an 8-bit register inflict a penal- 
ty on the precision and variety of frequencies which 
can be generated with a single sound channel. Eight 
bits only permit 255 distinct frequencies, although 

[continued on page 28) 
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A ATARI 



SUPERPRINTER 
PACKAGES 



SG-10 Printer and 
U-Print A 289 

Citoh 7500AP and 
U-Print A 292 

Panasonic 1091 and 
U-Print A 318 



Panasonic 1090 and 
U-Print A 269 

Legend 880 and 
U-Print A 287 

Powertype and 
U-Print A 369 



Super printer packages have no extra 
charges added when shipped in Conti- 
nental USA. 



Call for prices on joysticks, 
printer cables, blank floppy 
disks, and other computer 
accessories. 



Atari 130 XE Computer c^" For 

, _'. Current 

Atari 1 050 Disk Drive phcbs 



PRINTER 
BUFFERS 



Microfazer . 
U-Prlnt-16K 

Buffer . . . 
U-Print-32K 

Buffer . . . 
U-Print-64K 

Buffer . . . 



.. Call 
Printer 
. 79.95 
Printer 
. 99.95 
Printer 
109.95 



.IL 



muronici- inc 
THE POWER BEHIND THE PRIMTED WORD. 



SG-10 
SG-15 
SD-10 
SD-15 
SR-10 
SR-15 



219 
369 
339 
449 
Gail 
Gail 



PRINTER INTERFACES 

Aid interfast I ...' 99.95 U-Print A/1 6K Buffer . 

U-Print A 59.95 U-Print A/32K Buffer . 

U-Print A/64K Buffer . 109.95 



PRINTERS 

Gitoh 851 OAP -F . . 329 Legend 880 219 

Citoh 7500AP .... 219 Panasonic 1091 . 249 

Epson Call Panasonic 1 090 .1 99 

Toshiba 1340 559 Powertype 309 

Buy the print shop for 27.95 with the 
purchase of any printer. 



Indus GT 219 



MODEMS 

Maxwell 300/1200 

AA/DD 319 

MPP1000E.... 89.95 
Volksmodem 300 . . 59 



Volksmodem 1200 189 
R-Verter Modem 
Adapter 39.95 



U-Call Modem 
Adapter 44.95 



79.95 
99.95 



Buy the CompuServe Starter Kit for 
21.95 w/Any IWodem Purchase 



/A\ 


_ Lr-\\ 



B-Graph-D 44.95 

Beachhead-D 21 .95 

Jupiter Mission-D. . 31.95 



BATTERIES INCLUDED 

80 COLUMN 

CARTRIDGE 49.95 



S.A.M-D 

Home Pak-D 

Crusade In 
Europe-D .... 



. . . 37.95 
...31.95 

.. 24.95 



SUPER SPECIAL PRICES EFFECTIVE NOW THRU SEPTEMBER 31, 1985 



A T 

ACTIVISION 

Dccatholon-Cart 19,95 

Hero-Carl 19.95 

Pitfall ll-Carl 19.95 

River Raid-Carl 14.95 

Designers Penal-Cart 19.95 

Space Sliuille-Cart 19.95 

Gtioslbusters-D 24.95 

Great American Cross Country 
flace-D 20.95 

AVALON HILL 

Call for items and prices 

BRODERBUND 

Bank Street Writer-D 49.95 

Loderunnei-D 23.95 

Mask ol the Sun-D 27.95 

Operation Whirlwind-D 27.95 

Spelunker-D 20.95 

Stelttl-D 20.95 

Wtiistlefs Brother 20,95 

Print Shop-D 34,95 

Serpent's Slar-D 27.95 

Print Stiop Paper 16,95 

Print Strop Graptiics-D 19,95 

CBS SOFTWARE 

Call for Items and prices 

DATASOFT 

Bruce Lee-OT 27 95 

Letter Wizard + Spell-D, , 54,95 
Conan ttie Barbanan-DT , , , , 27,95 

MrDo-DT 27,95 

Alternate Pealily-D 27.95 

INFOCOM 

Deadline-D 29.95 

Enchanler-D 23.95 

Inlidel-D 29 95 

Planellall-D 24,95 

Sorcerer-D 29,95 

Slarcross-D 29 95 

Suspendeil-D 29,95 

Witness-D 29 95 

SeaStalker-D 24,95 

Cunhroals-D 24,95 

Suspecl-D 24,95 

Hilchiker-0 24 95 

Zorkt-D 24,95 

Zork II or lll-O 27,95 

Wishbringer-D 27,95 



A R 

EPYX 

Call for items and prices 

MICROPROSE 

Air Rescie l-D.T 23.95 

F-15 Strike Eagle-DT 23,95 

Crusade in Europe-D 27.95 

Decision m Desert-D 27.95 

Kennedy Approach-D 23.95 

MINDSCAPE 

Call lor items and prices 

MISCELLANEOUS 

Diskey-D 34.95 

Ultra Oisassembler-D 34.95 

Codewriler-0 69.95 

Star League Baseball D/T . , . 23,95 

Star Bowl Football-D:T 23,95 

Master Type-D/Cart 27,95 

Fliglil Simulator ll-D 34,95 

S,AM,-D 41,95 

Castle Wollenstein-D 20,95 

CompuServe Starter Kit 27,95 

Home Accountant-D 49,95 

Megaton! ll-D 19,95 

Monkey Wrencli ll-D 23,95 

Movie Maker-D 37,95 

Ullimalll-D 37,95 

Jupiter Mission-D 34,95 

Spy Hunler-Carl'D 29,95 

Tapper-Carl/D 29,95 

Up N Down-Carl'D 29,95 

PicBuilder-D 27 95 

Aslrochase-D 19,95 

Sargonll-DT 16,95 

Odesla Chess-D 49,95 

Spyvs, Spy-D 23,95 

MMG Basic Compiler-D 69,95 

Summer Games-D 27,95 

Pilstopll-D 27 95 

Gateway to Apshal-Cart 27,95 

Montezuma's Revenge-D ,,,, 27,95 

Dragon Pern-D 27,95 

Adventure Mas!er-D 34,95 

Get Ricti Senes-D 34,95 

Frogger It-Carl 24,95 

NelWortti-D 49,95 

Ramrod XL 79,95 

Stickybear-D 27,95 

Omnitrend Universe-D 69,95 

Space Beagte-D 23,95 

Beachhead-D 23 95 



J s__ 

MISC. (cont.) 

Letter Perfecl-D 39 95 

Harcourl ,' Bruce S,A,T 59,95 

Data Pe-fecl-D 39,95 

Star Wars-Carl 24,95 

S,A,G-E Graphics Editor-D , 39,95 

Strip Poker-D 23,95 

Scroll ol Abadon-D 23.95 

Bounty Bob-Carl 29.95 

Alien Voice Box 99,95 

Ultima IV-D 41,95 

Raid Over Moscow-S 27,95 



OFT 

MISC. (cont.) 

Micro-League Baseball-D .... 29,95 

Paper Clip-D 39,95 

Home Pak-D 34,95 

Ullinnall-D 37,95 

B-Graph-D 49,95 

Trolls 8 Tnbulations-D 19,95 

BallBlazer-D 27,95 

Retum On Fraclalis-D 27,95 

Halley PrO|ecl-D 29,95 

Astral Ritl-D 27,95 

Back To Basic Accounting-D, , , Call 



-EST. 1982- 



PO Box 17882, Milwaukee. Wl 53217 

ORDER LINES OPEN 

Mon-Fri 11 a m - 7 p,m CST • Sat 12 p,m, • 5 p m CST 

To Order Call Toll Free 

800-558-0003 

For Technical Info, Order 
Inquiries, or for Wise. Orders 

414-351-2007 

ORDERING INFORMATION: Please specily system 
For fast delivery send cashier's check, money order or direct bank 
transfers Personal and company checks allow 2 weeks lo clear 
Charges for COD are $3,00 School Purchase Orders welcome. In 
CONTINENTAL USA, include 13 00 shipping per software order 
Include 4% shipping on all Hardware orders, minimum S4,00, 
Mastercard & Visa please include card # and expiration date, Wl 
residents please add 5% sales tax, HI, AK. FPO, APO. Canadian 
orders — add 5% shipping, minimum $5 00 All other foreign 
orders, please add 15% shipping, minimum $10 00 All goods 
are new and include factory warranty Due to our low prices, all 
sales are final All defective returns must have a return authoriza- 
tion number Please call 414-351-2007 to obtain an RA# or your 
return will NOT be accepted for replacement or repair Prices and 
availability are subiecl to change witfioul notice 
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MISC. (cont.) 

Data Manager-D 19,95 

Electronic Checkbook-D 19,95 

Money Manager-D 19,95 

Qberl-Cart 24,95 

Pt)peye-Cart 24,95 

Slarlighler Joystick 9,95 

Wico Joysticks Call 

Tac II Joystick 14,95 

OPTIMIZED SYSTEMS 

Action-Carl 69,95 

Basic XL-Carl 54,95 

MAC/65-Cart 69,95 

MAC ,' 65 Tool Kil-D 27,95 

Action Tool Kit-D 27,95 

DOSXL-D 27,95 

Writer Tool-Carl 69.95 

Basic XL Tool Kit-D 27.95 

SCHOLASTIC 

Call for items and prices 

SCREENPLAY 

Call for items and prices 

SEGA 

Call for items and prices 

SIERRA ON-LINE 

Call for items and prices 

SPINNAKER 

Call for items and prices 

ELECTRONIC ARTS 

Archon )9.95 

Arcfionll 24.95 

Mule 19,95 

Realm/Impossibility 19.95 

Murder Zinderneuf 19.95 

Music Conslmclion 19,95 

Pinball Conslruclion 19,95 

One on One 24,95 

Seven Cities of Gold 24,95 

Financial Cookbook 29.95 

GAMESTAR 

star League Baseball-DT , , 20,95 

Starbowl Football-D;T 20,95 

On Track Racing-D 20,95 



ATARI is a trademark 
of ATARI. INC, 



SSI 

Carrier Force-D 37,95 

Combat Leader-D 24,95 

Cosmic Balance ll-D 24.95 

Cosmic Balance-D 24,95 

Broadsides-D 24,95 

War In Russia-D 49,95 

50 Mission Crush-D 24,95 

Queslron-D 32,95 

nails West-D 24,95 

Computer Ambush-D 37,95 

Galactic Advenlures-D 37,95 

Computer Baseball-D 24,95 

Reforger 88-D 37,95 

Objective Kursk-D 24,95 

Breakthrough/Ardennes-D , , , 37,95 

Field of Fire-D 24,95 

Imperium Galatium-D 24,95 

Opcr Market Garden-D 32,95 

Kamplgmppe-D 37,95 

Computer Quarlerback-D ,,,, 24,95 

Colonial Conquest-D 24,95 

Gemslone Warhor-D 21,95 

Six Gun Shoolout-D 24,95 

SYNAPSE 

Alley Cat-DT 16,95 

Blue Max-DT 23,95 

Dimension X-DT 23,95 

Drelbs-DT 23,95 

Encounter-D,'T 16,95 

Fori Apocalypse-DT 23,95 

Necromancer-DT 23,95 

New York Cily-D 19,95 

Pharoah's Curse-DT 23,95 

Quasimodo-D 19,95 

Rainbow Walker-DT 23,95 

Relax Stress Reduction Sys 79,95 

Shamus Case ll-DT 23,95 

Zepp!in-D,T 23,95 

Synfile-D 34,95 

Syncalc-D 34,95 

Syntrend-D 34,95 

Syiichron-D 27,95 

Syncomm-D 27,95 

Synstock-D 27 95 

Blue Max 2001-D 23,95 



D— DISK 

T— CASSETTE 

CART— CARTRIDGE 



No surcharge for MasterCard 
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we've seen how to shift the absolute frequency range 
by changing AUDCTL to other clock rates. 

A more powerful option is available to give very 
fine frequency tuning. This is done by combining two 
sound channels into a single 16-bit frequency regis- 
ter, which yields over 65,000 distinct frequencies. 

Again, AUDCTL holds the key By setting bit 4 of 
AUDCTL (decimal value 16], you can combine chan- 
nels 1 and 2 into a single voice, with AUDFl being 
the low byte and AUDF2 the high byte of the result- 
ing 16-bit frequency register. 

Similarly, setting bit 3 (decimal 8] of AUDCTL joins 
AUDF3 and AUDF4. The control registers for the high 
bytes (AUDC2 and AUDC4) now govern the volume 
and distortion of the new double-sized frequency 
registers. Selecting an appropriate clock rate (by set- 
ting other bits in AUDCTL as discussed above) makes 
an enormous range of frequencies available. 

Listing 3 shows off this new capability. This pro- 
gram uses two nested loops to increase the low byte 
(inside loop, X-register) and high byte (outside loop, 
Y-register) of the 16-bit voice created by joining chan- 
nels 1 and 2. Lines 210-220 accomplish this fusion 
and also select the 1.79 MHz clock rate to get high 
frequencies. 

Setting AUDCTL to 16 rather than 80 will give 
16-bit sound at the normal 64 KHz clock rate, to cre- 
ate some very low frequencies indeed. Even at 1 jif- 
fy per note, this program will take over 18 minutes 
to execute completely. If you can't wait that long, just 
press SYSTEM RESET. 

Notice again that the highest frequencies drop fair- 
ly rapidly, but frequency changes get progressively 
slower as time goes on. If you want to hear the real- 
ly low frequencies that can be produced with the 64 
KHz clock (down to about 1 pulse per second), start 
with the Y-register at about 200 instead of (Line 
340). Y values of 5 and 10 are also amusing to try. 
Sixteen bits gives Atari audio a new dimension of 
soiind quality. 

More sound components. 

All of our sample sounds so far have used tones 
with constant volume: just turn the sound on, wait 
a while and turn it off again. Most audio inputs we 
encounter in daily life are fai- more complex than that, 
however. 

The volume characteristics of a tone can be de- 
scribed in terms of its attack (how rapidly the vol- 
ume increases from to maximum), sustain (how 
long the maximum volume is maintained) and de- 
cay (how quickly the volume diminishes back to 0) . 
By manipulating these components of even a pure 



tone, much more interesting sounds can be produced. 
Listing 4 allows you to play with attack, sustain and 
decay. 

Because we will sometimes want a very short at- 
tack or decay period, the timing method we've been 
using based on the real-time clock may actually be 
too slow. Thus, Listing 4 incorporates a different delay 
subroutine in Lines 540-590. 

This is simply a nested loop using the X- and Y- 
registers of the 6502. The value in the X-register at 
the time the subroutine is called determines how 
many complete loops of the Y-register (0 to 255) will 
take place. So we can define our attack, sustain and 
decay times by setting the X-register to various values 
from to 255 before the JSR DELAY instruction. 

Unfortunately, these values no longer correspond 
to some actual unit of time; rather they're just arbi- 
trary time units. Lines 110-130 define memory loca- 
tions to hold the attack, sustain and decay values for 
convenience. Lines 260-310 show sample settings of 
these variables. 

First, the attack. We begin at Line 320 by setting 
the volume to 0. In this case, distortion is 10 for a 
pure tone, but you might try other settings for spe- 
cial sound effects. The statements in Lines 330-400 
increase the volume one unit at a time, up to a max- 
imum of 10, pausing at each step for the time indi- 
cated by the contents of the variable ATTACK. The 
smaller the number in ATTACK, the faster the vol- 
ume will rise from to 10. 

Lines 410-420 simply hold the tone at maximum 
volume for a time, based on the contents of SUSTAIN. 
Finally, Lines 430-510 form the decay routine, which 
is exactly the opposite of the attack segment. The par- 
ticular settings of AUDFl, ATTACK, SUSTAIN and 
DECAY in Listing 4 will create a "pinging" tone with 
a short attack, moderate sustain and fairly long decay. 

You can use the change memory conmiand in the 
debugger to modify these values, so that you can try 
new sounds without reassembling the program. For 
a long attack and short decay, try setting AUDFl to 
200, ATTACK and SUSTAIN to 30, and DECAY to 5. 
A wide variety of inflections can be achieved through 
manipulation of these volume parameters. 

Sound advice. 

The sample programs and discussion in this arti- 
cle are meant just to open up some of the enoxmous 
sound-generating potential of the Atari, and to show 
how to implement some of the effects within assem- 
bly language programs. 

This is by no means a complete discussion of the 
audio featm-es lurking within the Atari. For example. 
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we've barely touched on the creative use of distortion 
or simuhaneous playing of multiple voices with dif- 
ferent characteristics to synthesize unusual sound ef- 
fects. 

It's always difficult for me to create just the sound 
effects I want. I encourage you to use the program 
examples presented here to experiment with the di- 
versity of audio capabilities you have at hand. 

More specific information about the life and times 
of POKEY can be found in De Re Atari and the Atari 
Personal Computer System Hardware Manual. De Re 
Atari has especially good discussions of the clock- 
ing operation's use to produce various output frequen- 
cies and the use of polynomial counters to create 
distorted sounds. 

Many good sound editing programs are available 
to help you synthesize the sound you seek, and sam- 
ple programs (generally in BASIC) show up all over 
the place for commonly used sound effects. You might 
also study program listings in books and magazines 
to see how other programmers cleverly generate their 



imique sormd effects. But nothing will replace the 
trial-and-error method, and here you have the tools 
to help you get started. D 

With his B.S., M.S. and Ph.D. degrees in chemis- 
try, Karl E. Wiegers is a Senior Research Chemist at 
Eastman Kodak Company. He has worked with main- 
frame and microcomputers for fourteen years and has 
written for several computer magazines, with a num- 
ber of applications programs published. 

Listing 1. 

Sound ExaHple tte 
; by Karl E. Hiegers 

m 

;This Macro can be used with the 
jfltari Macro Assenbler to siMulate 
;the SOUND connand in Atari Microsoft 
; BASIC. It is like the SOUND 
;stateHent in regular Atari BASIC, 
;but with a duration paraneter added. 
;The duration is expressed in jiffies 
; Cl/60 second). The following progran 
; illustrates how to use this Macro. 

(continued on page 31) 
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1-800-351-3442 

VISA and MC Accepted 4% 
HOURS: Monday - Friday 9 am - 6:00 pm 

P.O. Box 4025 Williamsport, PA 17701 



In PA call (717) 322-7700 

POLICY: No deposit on COD orders. FREE freight on all pre-paid cash orders 
over S300 in the continental USA. APO & FPO add $5 per hundred. For priori- 
ty mail add $8 per hundred. PA residents add 6% sales tax. Defective products 
must have Prior RA number. Schools net 15. 



PRINTERS 

PANASONIC 

1090 187.00 

1091 237.00 

1092 389.00 

1093 585.00 

3151 455.00 

C.ITOH 

8510A 285.00 

8510 BC1 329.00 

8510 BC2 389.00 

8510 BP1 339.00 

8510 SP 389.00 

8510SR 429.00 

8510 SCP 459.00 

8510 SCR 477.00 

1550 BCD 485.00 

1550 P 445.00 

A10-20P 465.00 

F10-40P/S 875.00 

F10-55P/S 1059.00 

F10 Tractor 169.00 

F1 Sheet Feeder 349.00 

STAR MICRONICS 

SG10 214.00 

SG15 379.00 

SD10 345.00 

SD15 450.00 

SR10 485.00 

SRI 5 585.00 

Powertype 309.00 

cmzEN 

MSP-10 325.00 

MSP-15 479.00 

MSP-20 469.00 

MSP-25 629.00 



ATARI HARDWARE 



COMPUTERS 



DISK DRIVES 



800 XL 99.95 Indus GT 21 5.00 

1 30 XE 1 45.95 1 050 1 68.95 

1 30 ST 379.95 "Happy" 1 050 349.00 

520 ST 749.95 

PRINTERS 

XTM 201 Non-Impact Dot Matrix 99.95 

XTC 201 Color Non-Impact Matrix 109.95 

XDM 121 Daisy Wheel 209.95 

XMM 801 Dot Matrix Impact 1 69.95 

STC 504 Color/Non-lmpact 139.95 

STD 121 Daisy Wheel 219.95 

SMM 801 Dot Matrix/Impact 279.95 

MONITORS 

XC 141 14" Composite Color 199.95 

SM 124 12" Monochrome/High Res 135.95 

SC 1 224 1 2" RGB/Color 335.95 



PRINTERS (con't) 



ATARI 

1020 59.00 

1025 189.00 

1027 239.00 

MANNSEMAN TALLY 

Spirit 80 249.00 

Ml 160L 495.00 

MI 180L 595.00 

OKIDATA 

182 219.95 

84 640.95 

92 349.95 

93 560.95 

Imagewriter 425.95 



EPSON 

RX80 219.00 

LX80 249.00 

FX80 389.00 

JX80 529.00 

RXlOO 369.00 

FXlOO 550.00 

LEGEND 

880 209.00 

1080 229.00 

1380 269.00 

1385 305.00 



PRINTER PAPER 

Lazor 1 000 stits 1 5.95 

Lazor 2500 stits 29.95. 

CIRCLE #114 ON READER SERVICE 



SOFTWARE 

BATTERIES INCLUDED 

Bl 80 Board 99.95 

Bus Card 124.95 

Paper Clip 59.95 

Home Pacl< 32.95 

BRODERBUND "ATARI' 

Print Shop 29.95 

Graphics Library 18.95 

B.S. writer 41.95 

Stealth 21.95 

SYNAPSE 

Syn File 34.95 

Syn Calc 34.95 

Syn Trend 27.95 

ATARI 

Proofreader (D) 19.95 

Codewriter (D) 42.95 

Filewriter (D) 24.95 

Reportwriter (D) 24.95 

Menuwriter (D) 24.95 

Home Integrator.... (D) 23.95 
Small Business 

Inventor/ (D) 17.95 

Saleman's 

Expenses (D) 17.95 

A/R and A/P (D) 17.95 

Retail Invoice (D) 17.95 

The Learning 

Phone (C) 23.95 

Final Legacy (C) 19.95 

Tracks, Field (C) 25.95 

Galahad & Holy 

Grail (D) 17.95 

Adventure Writer. ...(D) 21.95 
Star Voyager (D) 17.95 

CARD 



MONITORS 

ZENITH 

122 85.95 

123 75.95 

ZUM 122A 82.00 

AMDEK 

300 Green 1 19.00 

300 Amber 129.00 

310 Amber 145.00 

Color 300 235.00 

Color 500 345.00 

Color 600 399.00 

Color 700 469.00 

Color 710 539.00 

XTRON 
Comcolor 1 14" Composite & 

Separate Video 189.00 

TEKNIKA 
MJ-10 Composite & 

Separate Video 199.95 

MJ-22 R.G.G. Composite & 

Separate Video 285.00 

BMC 
Amber 82.95 

Green 79.95 

INTERFACES 

MPP 1150 54.95 

Micro Print 39.95 

850 (Atari) 108.95 

Micro Stuffer64K Buffer . . . 99.95 
UPrint w/1 6K Buffer .... 79.95 
UPrint W//32K Buffer .... 99.95 
UPrint W/64K Buffer. . . 1 29.95 
MPP 1152 Buffer Kit ... 19,75 
Microprint Economy Printer 

Interface 49.95 

Microram 64K Expansion 

for Atari 600 XL 89.00 
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WHAT IS 
CHECKSUM DATA? 



Most program listings in ANALOG Computing are followed by a table of numbers appearing as 
DATA statements, called "CHECKSUM DATA." These numbers are to be used in conjunction with 
D:CHECK and C:CHECK (which appeared in ANALOG Computing issue 16 and the ANALOG 
Compendium) or with Uniclieck (from issue 24). 

D:CHECK and C:CHECK (written by Istvan Mohos and Tom Hudson) and Unicheck (by Tom 

Hudson) are designed to find and correct typing errors when readers are entering programs from 
the magazine. For those readers who would like copies of these articles, you may send for back 
issue 24 ($4.00 each) or the ANALOG Compendium ($14.95 plus $2.00 shipping and handling 



from: 



ANALOG Computing 

P.O. Box 625 
Holmes, PA 19045 



DISK WIZARD II 

ic 1984 


BASIC WIZARD 

© 1985 


THE MOST COMPLETE UTILITY PACKAGE 
FOR ATARrCOMPUTERS AT ANY PRICE 

100% MACHINE LANGUAGE • SINGLE LOAD • MENU DRIVEN 

THIS USER-FRIENDLY PACKAGE INCLUDES THE FOLLOWING POWERFUL 
PROGRAMS FOR THE ATARIMOO/SOO/XL SERIES COMPUTERS (40K REQUIRED) 

DISK BACK-UP — SINGLE/DOUBLE DENSITY • SUPPORTS 1 OR 2 DRIVES 
• ALLOWS BACKUP OF DISKS PROTECTED BY BAD SECTORING • FAST COPY 
OPTION • SECTOR STATUS SUMMARY • OPTIONAL PRINTOUT OF SECTOR 
STATUS • DISK MAPPING 

DISK EDIT -SINGLE/DOUBLE DENSITY • DISPLAY/MODIFY/PRINT ANY SEC- 
TOR • SECTOR DISPLAYED IN HEX ASCII/ATASCII • WORKS WITH ANY FOR- 
MAT • SCAN SECTORS FOR A SERIES OF BYTES OR A STRING • DISPLAY/ 
PRINT DIRECTORY • TRACE/REPAIR FILE LINKS • RECOVER AND AUTOMA- 
TICALLY VERIFY DELETED FILES • FORMAT DISKS WITH AUTOMATIC LOCK 
OUT OF BAD SECTORS • DECIMAL/HEX NUMBER CONVERSION 

DISASSEMBLER -SINGLE/DOUBLE DENSITY • DISASSEMBLE FROM DISK 
BY SECTOR NUMBERS • DISASSEMBLE COMPOUND BINARY FILES BY FILE- 
NAME • OUTPUT TO SCREEN OR PRINTER • SELECTABLE MNEMONIC 
DISASSEMBLY WITH OVER 400 STANDARD ATARI MEMORY LOCATION NAMES 

DISK SPEED — VERIFIES/ALLOWS ADJUSTMENT OF DISK SPEED • BAD SEC- 
TORING (810 ONLY) 

<li^^95 SHIPPING & HANDLING 
^ ^^ INCLUDED 


ALL NEW FOR THE ATARI* 
400/800 AND XL COMPUTERS 

ALL THE FUNCTIONS THE PROGRAMMER NEEDS 
FOR FASTER, MORE EFFICIENT PROGRAMMING IN BASIC. 

• 100% MACHINE LANGUAGE • DISK DIRECTORY 

• PULL-DOWN DISPLAYS • DOS FUNCTIONS 

• AUTOMATIC UNE NUMBERING * com^ROL'^^'^^^'^ 

• UP TO 64 DIFFERENT USER- , ^m i inf frror 
DEFINED FUNCTION KEYS * oEFINmoN 

• TYPE-AHEAD CAPABILITY • INSERT MODE 

• RESTORE CHARACTERS • ADVANCED EDIT FEATURES 

• COPY CHARACTERS • QUICK ENTRY OF 

COMMONLY USED BASIC 

• BLOCK DELETE STATEMENTS 

• LINE RENUMBERING • EASY-TO-FOLLOW MANUAL 

5^0f%95 SHIPPING & HANDLING 
**'^y INCLUDED 


ORDERING INFORMATION rjRnpR Tf 
For fast delii/ery, send certilied >^ H U C H !>. 
check or money order m -^ -^ ^^ ^_^ 

MASTERCARD S VISA ACCEPTED. | — ^lIIII— / . 

(NY Hesidenis add 7% sales lax) ■ V^ \J \^ 1 V 
Phone orders accepted on C.O.D. 

and charges. Info. and NN 

"ATARI is a registered trademark of Atari Corp, 1 -31 5-4£ 




32-0320 /S^»^/ 

•f^- \JyJt-\J / SOFTWARE. INC. / 

' Residents ,„„ Qu^firz way 

8-0485 SYRACUSE. NY 13219 



CIRCLE #115 ON READER SERVICE CARD 



Q 



Assemble Sound continued 



Here are the necessary equates: 



RTCLOK 

TIMER 

AUDFl 

AUDCl 

AUDCTL 

SKCTL 



Sl2 

$CB 

$D2e8 

$D2ei 

5D20S 

$D20F 



Here is the Macro itself. VOICE can 
be 0-3, PITCH can be 0-255, DIST can 
be even values froH e-14, VOL can be 
0-15, and DUR can be 1-65535. 

50UND MACRO VOICE, PITCH, DIST, VOL, DUR 

L0A tty.2 

5TA flUDFl+2»>;i 

LDA tt[[>'.3 5HL 41 OR 7:41 

STA AUDC1+2»X1 

LDA ttLOH y.S 

STA TIMER 

LDA ttHIGH Y.S 

STA TIMER+1 

JSR DELAY 

LDA tte 

STA audfi+2»k;i 

ENDM 



Here is the sanple progran. It plays 
an undistorted niddle c at volune 6 
for 1.25 seconds (75 jiffiesJ. 

ORG $3000 

START LDA ttO 

STA AUDCTL 

LDA nz 

STA SKCTL 

SOUND 0,121,10,8,75 

BRK 



Here is the tining loop. 



DELAY LDA ttO 

STA RTCLOK+1 
STA RTCLOK+2 

LOOPl LDA RTCLOK+1 
CMP TIMER+1 
BNE LOOPl 

L00P2 LDA RTCLOK+2 
CMP TIMER 
BNE L00P2 
RT5 



set up autorun feature so you can 
run this froH the DOS Menu with 
the L option. 

END START 



OlSO 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0200 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
8570 
0580 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 
0720 
0730 
0740 
8750 
0760 
0770 
0780 
0790 
0800 
0810 



;AsseMbIe, then run using the 
; TRACE option in the debugger. 

RTCLOK = 512 

TIMER = SCB 

PITCH = SCD 

AUDFl = SD200 

AUDCl = $D2ei 

AUDCTL = $D208 

SKCTL = SD20F 

STICKO = 5278 

SETVBV = SE45C ;VBI entry point 

XITVBV = SE462 ;VBI exit point 

'«=530eo 

'lda no 

STA AUDCTL 

LDA »3 

STA SKCTL 

LDA ttlOO 

STA AUDFl 

STA PITCH 

LDA ttl04 ;diStortion=:6,VDlUMe=8 

STA AUDCl 

set up the vertical blank 
interrupt like this, where VBI 
is the label of the beginning 
of your VBI routine 

LDY ttVBI&255 

LDX ttVBI/256 

LDA tt7 

JSR SETVBV 
BRK 

;Here is the VBI routine itself 



VBI 
LDA STICKO 
AND ttl 
BNE STICKDN 
LDA 1140 
CMP PITCH 
BEO EMIT 
DEC PITCH 
LDA PITCH 
STA AUDFl 
JMP EXIT 

STICKDN 
LDA STICKO 
AND tt2 
BNE EXIT 
LDA tt255 
CMP PITCH 
BEO EXIT 
INC PITCH 
LDA PITCH 
STA AUDFl 

EXIT 
JMP XITVBV 
.END 



;get stick reading 

ipointing up? 

;nD, check for down 

;yes, 

;pitch at HiniMUH? 

;yes, exit VBI 

ireduce pitch value 

iget it 

iput in freq reg 

Heave VBI routine 

;get stick reading 
;pointing down? 
;no, exit VBI 
;yes, check if 
; pitch at HaxiHUM? 
;yes, exit VBI 
;no, increMent it 
iget it 
;stuff in freq reg 

; leave VBI routine 



Listing 2. 

0180 ; SOUND EXAMPLE tt7 

8110 ; by Karl E. Hiegers 

0120 } *- , 

0138 jThis exaMple uses a vertical 

0140 jblank interrupt routine to get 

0150 ;continuous sound. Use a 

0160 ; joystick in port 1 to increase 

0170 ;or decrease the frequency of 

0180 ;the race car sound effect. 



0100 
0118 
0120 
0130 
0140 
0150 



Listing 3. 
SOUND EXAMPLE ttO 

by Karl E. Miegers 

This exaMple plays all tones 
possible by Joining channels 1 
and 2 to forM a single l6-bit 
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LJ Assemble Sound cominued 



oiee 

0170 
0180 

ei?e 

0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0280 
02?0 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
0580 
0598 
0600 
8610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 



;register. Played at a rate of 
;60 tones per second, it will 
stake over 18 Hinutes to 
;co»plete the prograH! Press 
;5Y5TEM RESET to Stop the sound. 



RTCLOK 

TIMER 

AUDFl 

AUDCl 

AUDF2 

AUDC2 

AUDCTL 

SKCTL = 

'»-S3000 



Sl2 

SCB 

$D200 

$D201 

SD202 

$D203 

$D208 

SD20F 



LDA ttOO 
5TA AUDCTL 
LDA tt3 
STA SKCTL 
LDA »160 
STA AUDCl 
LDA »168 
STA AUDC2 
LDA «1 
STA TIMER 
LDA ttO 
STA TIMER+1 

LDX no 
LDY no 

STY AUDF2 
NEKTTONE 
STX AUDFl 
JSR DELAY 
INK 

BNE HEXTTONE 
INY 

STY AUDF2 
BHE NEXTTOHE 
BRK 

DELAY 

LDA no 

STA RTCLOK+1 
STA RTCLOK+2 

LOOPl 
LDA RTCLOK+1 
CMP TIMER+1 
BNE LOOPl 

L00P2 
LDA RTCLOK+2 
CMP TIMER 
BNE L00P2 
RTS 
.END 



; join Channels 1+2 
jclock at 1.79 MHz 



;turn off 

; channel 1 volune 

;norHal channel 2 

;1 jiffy per tone 



; start with both 

;channels silent 

;inc channel 1 
; low byte 
;when X reaches 
;again, increnent 
{Channel 2 hi byte 
; finally stop 



Listing 4. 



0100 

Olio 

0120 

0130 

0140 

0150 

0160 

0170 

0180 

0190 

0200 

0210 , 

0220 ATTACK = $CD 



SOUND EXAMPLE tt9 
by Karl E. Hiegers 

In this prograM you can set 
the attack, sustain, and decay 
tines for a tone to Hodify its 
acoustic character. A different 
delay loop is used. Tines now 
are in arbitrary units, not 
ji f f ies. 



0230 
0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 
0550 
0560 
0570 
0580 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 
0670 
0680 
0690 
0700 
0710 
0720 
0730 



SUSTAIN^ 5CE 
DECAY = $CF 
AUDFl = $D200 
AUDCl = $D201 
AUDCTL = SD208 
SKCTL = SD20F 

'»=S3000 

LDA no 

STA AUDCTL 
LDA tt3 
STA SKCTL 
LDA tt35 
STA AUDFl 
LDA tt2 
STA ATTACK 
LDA tt30 
STA SUSTAIN 
LDA tt3e 
STA DECAY 
LDA ttl60 
ATLOOP 
STA AUDCl 
LDX ATTACK 
JSR DELAY 



CLC 

ADC ttl 
CMP tH71 
BNE ATLOOP 
LDX SUSTAIN 
JSR DELAY 
LDA ttl69 
DKLOOP 
STA AUDCl 
LDX DECAY 
JSR DELAY 
SEC 

SBC ttl 
CMP ttl59 
BNE DKLOOP 
BRK 

DELAY 

LDY ttO 
DELAY2 

DEY 

BNE DELAY2 

DEX 

BNE DELAY 

RTS 

.END 



;set frequency 
;of channel 1 
jset duration for 
jattack, 

;sustain, 
;and decay 
{portions of tone 
; start w/volune off 

{gradually increase 
;volune in a loop 
{according to attack 
{tine set earlier 

{Stop at volune = 10 

{hold Csustain) tone 
{for specified tine 
{Start decreasing 

{volune, just the 
{opposite of attack 
{technique used 



{Stop when voIune=e 



{this delay loop 

{uses X and Y regs 
{to loop as fast as 
{the nicroprocessor 
{Will let you 
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Boot 



^, Gamp 




by Tom Hudson 



Last issue's Boot Camp introduced you to the ex- 
citing world of the Atari computers' Central Input- 
Output system, CIO. This issue, we'll conclude our 
examination of the CIO functions and write a short 
program demonstrating the various CIO routines. 

If you haven't read last issue's Boot Camp, I sug- 
gest you do so before tackling this installment. There 
is a lot of background information you'll need to un- 
derstand before trying to use these functions. 

Reading records. 

We've already seen how the Atari CIO routine can 
read and write individual characters. What happens 
when we want to work with whole sentences? For- 
timately, CIO has the ability to work with data in sen- 
tence form as well, by using the GET and PUT REC- 
ORD commands. 

The Atari CIO routines consider a "record" to be 
any group of characters which ends with the ATAS- 
CII end-of-line (EOL) character, $9B [155 decimal). 
When typing, the EOL character is generated each 
time you press the RETURN key on your keyboard. 
Files such as LISTed BASIC and assembly language 
programs are lines of text terminated with EOLs. To 
read them, you would use the CIO GET RECORD 



command; to write them, you would use the CIO 
PUT RECORD command. 

To use the GET RECORD command, you need to 
set the following lOCB parameters: 

ICCMD — Set to $05 

ICBAL & ICBAH — Pointer to start of 
input data buffer 

ICBLL & ICBLH — Maximum number of 

bytes to read, including 
EOL. 
This command is rather straightforward. When you 
call CIO, it will read characters from the specified 
file until an EOL character is read. The 2-byte pointer 
made up of ICBAL and ICBAH tells CIO the address 
where you want it to place the record read from the 
file. You must be sure that the 2-byte value ICBLL 
and ICBLH is set to the size of the buffer you've re- 
served, otherwise CIO may read in extra characters 
and wipe out important data that resides in the mem- 
ory after the buffer. 

You must also be sure that your input buffer is large 
enough to hold the biggest record that will be read 
from the file. If CIO reads a record too long to fit in 
the buffer, it will fill the buffer with as many charac- 
ters as it can, then continue reading until an EOL 
character is read or the end of the file is reached. 
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THE CMO ADVANTAGE SPECIAL PACKAGES 



SPECIALS 








m 




^ THE BEST PRICES! 

^ Next day shipping on all in 
stock items. 

^ Free easy access order 
inquiry. 

^ Orders from outside 

Pennsylvania and Nevada 
save state sales tax. 

i^ Free technicial support witii 
our factory trained technical 
staff. 

t^ There is no limit and no 
deposit on C.O.D. orders. 

^ There's no extra charge for 
using your credit card. Your 
card is not charged until we 
ship. 

1^ No waiting period for 
cashiers checks. 

^ We accept purchase orders 
from qualified corporations. 
Subject to approval. 

1^ Educational discounts 
available to qualified 
institutions. 

^ FREE CATALOG MEMBERSHIP. 



ORDER LINE 



1-800-233-8950 

In PA 1-800-242-4215 

CUSTOMER SERVICE 

AND 

TECH SUPPORT 

1-717-327-1450 

Dept. B708 



■ 






<^ 



MEMBER DIRECT MARKETING ASSOCIATION 

CREDIT CARDS 



^ 





DIHEnsCiUB 

SHIPPING 

Add 3%, minimum $5.00 ship- 
ping and handling on all orders. 
Larger shipments may require 
additional charges. 
All items subject to availability 
and price change. 
Returned shipments may be 
subject to a restocking fee. 



CANADIAN ORDERS 



1-800-268-3974 

Ontario/Quebec 

1-800-268-4559 

Other Provinces 

1-416-828-0866 

in Toronto 

TELEX: 06-218960 

2505 Dunwin Drive, 

Mississauga, Ontario 

Canada L5L1T1 

All prices shown are for 
U.S.A. orders. 
Call The Canadian Office 
for Canadian prices. 



7/AlS MAILING ADDRESS 



COMPUTER MAIL ORDER 
Department B708, 

477 E. Third Street 
Williamsport, PA 17701 




Package #AAB400P Includes: 
Atari 400 16K color computer, 
410 program recorder, Basic car- 
tridge, and dust cover. 

.99 



$59. 




Package #AAB400G Includes; 
Atari 400 16K color computer, 
822 thermal printer, 20 assorted 
game cartridges, 482 The 
Educator (410 program recorder. 
Atari Basic cart.. States & 
Capitals program cassette). 



$119.99 




Package #AAB800P Includes: 
Atari 800 48K color computer, 
810 disk drive, 410 program 
recorder, Basic cartridge, box of 
10 disks, and dust cover. 



$239.00 




Package #AAB1200P Includes: 
Atari 1200XL 64K color computer, 
810 disk drive, 825 printer, 
850 interface. 



$379.00 



WARRANTIES 

AAB1200W 1-yr. warranty for 
AAB1200P pkg. 

$99.99 

AAB800W 1-yr. warranty for 
AAB800P pkg. 

$69.00 

AAB400W 1-yr. warranty for 
AAB400P pkg. 

$39.00 

AAB1200W 1-yr. warranty for 
AAB400G pkg. 

$69.00 
NOTE 

All items sold "as is" with a 15 
day exchange policy. Units 
available for sale for the most part 
do not have instruction manuals 
and/or original packaging. Some 
units may have minor cosmetic 
damage. All units are in new 
working condition. 
All items are in Limited Quantities. 



«2 



99 

^ EACH 

(Minimum of 3) 



AAB401 3 ASTEROIDS 

AAB8130 CAVERNS OF MARS 

AAB4020 CENTIPEDE 

AAB4025 DEFENDER 

AABB026 DIG DUG 

AAB8031 DONKEY KONG 

AAB8039 EASTERN FRONT 

AAB8030 E.T. 

AAB4024 GAU\XIAN 

AAB4012 MISSILE COI^MAND 

AAB4022 PAC MAN 

AAB4027 QIX 

AAB400e SPACE INVADERS 

AAB40tl STAR RAIDERS 
AAB4006 SUPER BREAKOUT 

AAB4010 3-D TIC-TAC-TOE 

AAB8045 lulUSIC COMPOSER 

AAB8045 PENGO 

AABe029 FOOTBALL 

AAB8057 TYPO ATTACK 

AAB8033 HOBOTRON 

AAB8034 POLE POSITION 

AAB8042 TENNIS 

AAB8043 MS PACMAN 

AABe044 JOUST 

AAB8049 JUNGLE HUNT 

AAB4009 CHESS 

(Repackaged without instructions) 



ATARI HM| 

400 ^ 

Computers $39.®® 



ATARI 

800 



48K 

sea 95 Color 
'o9«** Computers 



ATARI 

1200XL 

64K 
Computers *o9.®® 





ACCESSORIES 



\ ~ I 

$19.99 

ATARI 

410 
Program 
Recorder 



ATARI 

822 

Thermal 

Printer 




$14.99 



INTERFACES 

Digital Devices 

DDA01 S49.99 

DDA02 S59.99 

DDA02 569.99 

Curtis 

Safety Strip *19.95 

Bit 3 

Full View 80 
(80 col. card)....S 179.09 

RAM BOARDS 

Axlon 32K :....*39.»» 

Axlon 48K' S74.»» 

Axlon 128K S249.00 

•Expand your Atari 400 to a full 48K 
AtariAABCX853 16K S9.99 

PROGRAMMER KIT 

Includes Basic, Self-teactiing 
Book, and Reference (iflanual. 

$19,99 

EDUCATOR KIT 

Includes 410 Program Recorder, 
Atari Basic and tfie Educational 
cassette States and Capitals. 

$24,99 

JOYSTICK SPECIALS 

Wico Boss $14.99 

Wico Original Red Ball$34.»9 

Quickshioot Controller.. $4.99 

ATARI CX30 Paddles ...99*= 

SOFTWARE SPECIALS 

Atari Basic «14.»9 

Atari Writer *14.99 

Atari Pilot »9.99 

Atari Logo »9.99 

Atari Assembler Editor. »9.99 



ATARr 

850 
$99.99 interface 



ATARI 

1030 
MODEM 



$59.99 



ATARI 835 
Direct Modem 
$39.99 



Printers 



Model 
550 

$259.«<» 



Model 846 

Interface 



Model 
100 

$139.00 
$59.99 



Color 300 
$199.00 



NEC 
Color 1215 

$239.00 




INDUS 
ATARI 

GT 
Disk Drive $239.00 

SS/SD DISKETTES 

Maxell S14.»» 

Nashua »11.«» 

(Pack of 10) 






E^^a^.^1 



S^ 



3 -S -S^^ =^^'^^*^-?0.=^r^S:^^v^a^ r£E^v3 



±vS/i 




Boot Camp continued 



All the characters read after the buffer is full will 
be discarded, and your program will never see them. 
After the EOL is read from the file, CIO places an 
EOL at the end of the buffer and returns an ERROR 
#137, to indicate that a "truncated record" was read. 
It's not a good practice to have records truncated in 
your programs, so just be sure you've made your buff- 
er large enough to hold the largest record that's pos- 
sible in the file. 

Typical text files created by the Atari screen edi- 
tor will have records of less than 128 characters. I 
usually allocate a 256-byte buffer for text I/O opera- 
tions, to provide a wide safety margin. 

After issuing a GET RECORD command, CIO will 
set the ICSTA (status) byte and the Y register to in- 
dicate the result of the input operation. It will also 
change the ICBLL and ICBLH bytes to inform you 
of the number of bytes that were actually read from 
the file. With a 256-byte buffer, the number of bytes 
read could range from 1 to 256. This number can 
come in handy in some types of I/O processing. 

The example below shows a typical GET RECORD 
operation from a file. The lOCB used is number four, 
and is assumed to be open already. 



eiee 


LDX 


tt$48 


IIOCB tt4 


6118 


LDA 


tt$85 


GET RECORD 


0120 


5Tft 


ICCMD,X 


PUT IN lOCB 4 


0138 


LDA 


ttBUFFER/256 , 


PUT BUFFER. . . 


0148 


5TA 


ICBAH.M 


ADDRE55... 


8150 


LDA 


ttBUFFER&255 , 


IN lOCB. . . 


0168 


5TA 


ICBAL.K 


NUHBER 4 


8178 


LDA 


tt256/256 


PUT NUHBER... 


8188 


STA 


ICBLH, X 


OF BYTE5... 


8198 


LDA 


tt256&2S5 


IN lOCB.. . 


0208 


5TA 


ICBLL, X 


NUHBER 4 


0218 


J5R 


CIOU 


GET RECORD! 


8228 


BPL 


RECOK 


NO ERROR! 


8238 


CPY 


ttl37 


TRUNCATED? 


8240 


BEQ 


TRUNREC 


YES! 


8258 


CPY 


ttl36 


END-OF-FILE? 


0260 


BEQ 


EOFILE 


YES! 


0270 


BUFFER 


*-**256 


RESERUE BUFFER 



Line 100 of this code tells the CIO that it is to use 
lOCB number four for this I/O operation. Remember, 
the lOCB number is passed to CIO through the X reg- 
ister, and is the value of the lOCB number times 16. 
Fortunately for us humans, who don't enjoy working 
in base 16, this number works out nicely: lOCB num- 
ber is indicated by $00, lOCB number 1 by $10, 
lOCB number 2 by $20, and so on. 

Lines 110-120 set the CIO command byte (ICCMD) 
in lOCB number four (indexed by the X register) to 
$05, the command byte for the GET RECORD com- 

Lines 130-160 set the ICBAL and ICBAH bytes to 
point to the input buffer we've set up at Line 270. 



All characters read from the file will be placed in 
memory starting at this address. 

Lines 170-200 set ICBLL and ICBLH to the length 
of our data buffer. It's been set up to hold 256 bytes, 
so we place the value 256 into the ICBLL and ICBLH 
bytes. It's important that you always set these bytes 
to the buffer length — if this value is smaller than the 
buffer size, you may get a trmicated record error; if 
it's larger than the buffer, the GET RECORD opera- 
tion may wipe out important data that follows the 
buffer. 

Line 210 jumps to the CIO subroutine vector, CIOV, 
to perform the GET RECORD function. After CIO has 
completed the I/O operation, it will return to this 
point in the code. 

Line 220 branches to the label RECOK, if the GET 
RECORD operation was completed successfully. Re- 
member, if CIO returns with a negative value in the 
Y register, some sort of error has occurred, and your 
program must take the appropriate action. The BPL 
RECOK instruction is only executed if the Y register 
is POSITIVE (after a JSR CIOV call, the sign flag con- 
tains the status of the Y register) , indicating a suc- 
cessful operation. 

Lines 230-240 compare the Y register to the value 
137, the error code for a truncated record. As indi- 
cated above, the truncated record error lets you know 
that the I/O buffer was too small for the record you 
tried to read. In the case of this example, a truncated 
record error would occur if the code tried to get a 
record longer than 256 bytes. If the error is equal to 
137, the program branches to the label TRUNREC, 
where appropriate code would handle the error and 
report it to the user. 

Lines 250-260 check to see if the error that oc- 
curred was a 136, or an end-of-file condition. If so, 
the program branches to the label EOFILE, where the 
file would be closed, and processing would continue. 

Testing for other errors could also be added, if 
necessary. I've only showed a couple of the possible 
tests, so you can see how they would be handled. 

Putting records. 

As with the GET CHARACTERS coimnand dis- 
cussed last issue, the GET RECORD command has 
an output cormterpart, known as the PUT RECORD 
command. It works just like the GET RECORD com- 
mand, but, instead of reading records from an I/O 
device, it writes them. Let's see how it works. 

The following fields must be set up in the lOCB 
before executing the PUT RECORD command: 
ICCMD — Set to $07 
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Boot Camp 



continued 



ICBAL & ICBAH 



ICBLL & ICBLH 



- Two-byte pointer to 
output data buffer 
Two-byte value 
indicating maximum 
data length 



Like the GET RECORD function, the PUT REC- 
ORD function operates on data that is terminated 
with the EOL character (ATASCII 155 decimal, $9B 
hex). The file that you're writing to must be opened 
for either output or input/output operations. 

The PUT RECORD function is also similar to the 
GET RECORD function in that the ICBAL and IC- 
BAH values must be set to the starting address of 
the data buffer. 

The ICBLL and ICBLH values are similar to those 
used by the GET RECORD command, in that they 
tell CIO the maximum number of bytes contained 
in the buffer. When the PUT RECORD command 
is issued, CIO will write bytes to the output device 
until it sends an EOL character or reaches the end 
of the data buffer. 

If the end of the buffer is reached before an EOL 
character is encountered, it will automatically send 
the EOL character to the file for you. It's better pro- 
gramming practice, however, to make sure your out- 
put buffer contains an EOL character. It is always 
better to rely on your own programming than to as- 
sume that the system will do the operation for you. 

The following example shows how to write a text 
message to a file. The program assumes that lOCB 
number three is already opened as output to some 
I/O device. It could be a printer, disk drive, screen 
or any other I/O device, but it doesn't matter as far 
as our program is concerned — CIO's "device inde- 
pendence" lets us perform most I/O operations 
without regard to what type of device we're using. 

eiee ldx n$ZQ ;iocb uz 

eiie LDA tt$e9 ;put record 

8129 STft ICCHO.X ;PUT IN lOCB 3 

8138 LDA ttRECORD/256 ;PUT BUFFER... 

8148 5TA ICBAH,K ; ADDRESS... 

8158 LDA ttREC0RDS255 ;IN lOCB. . . 

8168 5TA ICBAL, M ;NI1HBER 3 

8178 LDA tt92/256 ; PUT NUMBER .. . 

8188 STA ICBLH, X ;0F BYTES... 

8158 LDA tt92S255 ;IN lOCB... 

8288 STA ICBLL, X ; NUMBER 3 

22i2 „^ :!^" ^^^^ iPUT RECORD! 

8228 RECORD .BYTE "THIS IS A TEST",l9B 

Line 100 of this example sets the X register to $30, 
indicating that we're using lOCB number three for 
our output operation. 

Lines 110-120 set the CIO command byte to $09, 
telling CIO that the command we're issuing is a PUT 
RECORD command. 



Lines 130-160 point the ICBAL and ICBAH pointer 
to our I/O record, which, in this case, is a simple 
string in Line 220 stating, THIS IS A TEST. Note that 
the text is terminated with the ATASCII EOL charac- 
ter, $9B. More on this in a moment. 

Lines 170-200 set the CIO buffer length to 92. This 
is obviously longer than our short message, but that's 
all right — CIO will stop as soon as it reaches the EOL 
character at the end of the message. What if we had 
not included the EOL? CIO would simply keep send- 
ing characters until all 92 were sent or an EOL had 
been encountered in the memory following the mes- 
sage. The moral: Always specify an EOL character 
at the end of each text string! 

Line 210 calls CIO to perform the PUT RECORD 
operation. 

Upon return from the CIOV subroutine, the Y reg- 
ister and ICSTA location will contain the result of 
the output operation. A successful operation wall re- 
sult in a status value of $01, while an error will give 
a result of $80 or greater. 

Finding the status. 

There are times when you'll want to get the cur- 
rent status of an I/O device without actually perform- 
ing a function that will transfer data. CIO provides 
a special STATUS function to let you do this quickly 
and easily. 

In order to execute the STATUS function, you must 
set the following lOCB parameters: 
ICCMD — Set to $0D 
ICBAL & ICBAH — Pointer to device/ 

filename specification 
if the file isn't already 
open 

As with the other commands used by CIO, the 
command byte tells the CIO subroutine what func- 
tion it's to perform. For the STATUS command, the 
command byte is $0D. 

The second setting for the STATUS command, IC- 
BAL and ICBAH, is optional. If you want to check 
the status of the device and the lOCB is already 
opened to that device, you don't need to set this pa- 
rameter. 

If the lOCB isn't already opened, you must set the 
ICBAL and ICBAH bytes to point to a string which 
indicates the device (and the filename, if applicable) 
you want to check. Let's look at two examples: 



8188 


LDX 


tt$ie 


;IOCB ttl 


8118 


LDA 


tt$8D 


; STATUS. .. 


8128 


STA 


ICCMD, X 


,-IN lOCB ttl 


8138 


JSR 


CIOV 


;GET STATUS! 



The above code shows how to check the status of 
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4 
7 



a device if the lOCB is already opened to it. All you 
need to do is specify the lOCB number in the X reg- 
ister (Line 100), set the command number to $0D 
(Lines 110-120], and call the CIO subroutine (Line 
130). CIO will return the device status in the ICSTA 
location and the Y register, as well as 4 bytes from 
the device controller in the DVSTAT locations, from 
$2EA to $2ED in memory 

Location $2EA in DVSTAT contains device error 
status and command status information as follows: 
Bit Meaning 

Invalid command frame received. 
Invalid data frame received. 
Output operation error. 
Write-protected disk. 
System inactive (on standby). 
Intelligent peripheral controller. 
Location $2EB in DVSTAT holds device status in- 
formation. For the disk drive, it contains informa- 
tion from the drive's controller chip status register. 
Location $2EC in DVSTAT contains the maximum 
device timeout value in seconds. 

Location $2ED in DVSTAT contains the number 
of bytes in the output buffer. 

When the device whose status you wish to check 
on isn't open, you must use the "implied open" op- 
tion of the STATUS command . Here's an example : 

tt:$4e 

}t$8D 

ICCMD,X 

ttDEVICE/256 

ICBAH.X 

ttl>EUICE&255 

ICBAL,X 

CIOM 

.BYTE •'K:",$3B 

Line 100 of this code sets the X register to $40, in- 
dicating that the command is to use lOCB number 
four. 

Lines 110-120 set the CIO command byte to $0D 
(STATUS). 

Lines 130-160 set the ICBAL and ICBAH pointer 
to point to the string located at the label DEVICE. 
This string indicates the device we want to check the 
status of, and must be terminated by an EOL charac- 
ter. In this particular example, we're checking the sta- 
tus of R:, the number one RS-232 port of the 850 
interface module. You could have specified any de- 
vice or device: filename specification. 

Line 170 executes the usual CIO subroutine, CIOV 
CIO will perform an implied OPEN operation, check 
the status of the device, CLOSE the device, and re- 
turn to the calling program. Upon return, you can 
examine the ICSTA location, Y register, and the con- 



eiee 


LDX 


8110 


LDA 


ei20 


5Tft 


0130 


LDA 


0140 


STA 


8150 


LDA 


0160 


5TA 


0170 


JSR 


0180 


DEVICE 



;IOCB tt4 
;STATU5.. . 
;IN lOCB tt4 
;PUT DEVICE. 
; ADDRESS. . . 

f XH « « a 

;I0CB U4 
;GET STATUS! 



tents of the four DVSTAT bytes. 

Line 180 contains the device which is to be exam- 
ined for status information. Always be sure you ter- 
minate device name strings with the EOL character 
($9B). 

Special functions. 

One of the nice things about CIO is that you can 
write your own custom device handlers with func- 
tions that are unique to that device. For example, the 
disk file system used by the Atari computers has 
several functions that other devices, such as cassette 
drives, cannot use. In these cases, the device drivers 
can be written to use command numbers greater than 
$0D. These commands are known as "special" com- 
mands. 

Special command values are specified by the de- 
vice they're to be used with, and we'll cover them 
as required in future installments. Right now, let's 
write a program that uses some CIO calls! 

(continued on page 54] 




PASCAL 

For the Atari 

kyan pascal is the most complete package available for learn- 
ing and using the Pascal language And now. it's available for 
the Atari family of computers 

kyan pascal Is easy to use. lightning fast, and loaded with fea- 
tures It's a full Pascal implementation and perfect for both be- 
ginning and advanced programmers 

kyan pascal features: 

• Optimized Machine Code Compiler. 

• Built-in Full Screen Text Editor: 

• String-Handling, Chaining. Include File, and Other 
Powerful Extensions: 

• 13-Digit Arithmetic Precision and Full Graphics 
Support, 

• Built-in Assembler (Allows Full Hardware Control); and. 

• Tutorial Manual with Sample Programs 

kyan pascal requires 64K of memory and a single disk drive 
No additional hardware is necessary And, it comes with kyan's 
MONEY BACK GUARANTEE If not completely satisfied, 
return it within 15 days for a full refund. 
kyan pascal for the Atari S69.95 

(Add S4 50(copy lor nanaiing S12 00 oulside Norm America CaMoroia 
residenls add 54 55/copy tO' sales laxi 

Send Check/Money O rder to: kyan software. Dept M 
Call: (415) 775-2923 'I^^L^^ 1850 Union St . Ste 183 
MC/Visa Accepted ' 'ES^. ^^" Francisco. CA 94123 
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E COMPUTER PALACE we know atari! 

I lii ^■^^^■TMB^ ^^ ■ ^BB^ BT il^^a^B^T^^B ^H CALL US at (503)683-5361 FOR information 



Help 
Calc 



SPREADSHEET 

TEMPLATES 

READY TO LOAD-N-GO 

FOR USE WITH SynCalc 

'Software fit for a King !" 




Let Help Calc Help FEATURES: 

• Eight ready-to-use Templates. 
You For Only - - . • ^^^Y to use . . . just load them from 

Syncalc and enter your data. 

• Save hours of tedious spreadsheet setup. 
^P ^ ^\ ^^ li * All formats are pre-tested for accuracy. 
^^ I ^m ^fl^l • Complete, professionally written 

t' ' ^^ ■ ^^^^ instruction manual with spreadsheet 

examples. 

Requirements: 

Syncalc: program. 

48K(min) Alari 

computer. 

At least one disk 

drive. 

80 column 

printer. 

• Templates included: 

— Loan Amortization Schedule 

— Net Present Value 

— Future Value 

— Personal Financial Statement 

— Alternative Investment Analysis 

— Check Register 

— Personal Register(Roster 

— Depreciation Schedule 




INVENTORY 
MASTER 

[JJSoftware fit for a King!" 

FEATURES: 

• Over 1900 items per Double Density disk. 

• Part numt)er with Product Description. 

• Quantity in stocl</Number of orders outstanding. 

• Three vendors with cost from each vendor. 

• Last Purchase Order and from which vendor 

• Min/max re-order level. 

• Last six months sales history. 

• Retrieve any item within 5 seconds. 

• Fast edit capability. 

• Automatic Record updating from Purchase Orders 
and Product Invoices. 




$89.95 



One of the 
most versatile 
data-base 
programs available. 

Features: 

• LIGHTNING FAST RETRIEVAL < 

• FAST SORTS ON ANY FIELD > 

• SUPPORTS UP TO 4 DRIVES • 

• SINGLE OR DOUBLE DENSITY' 

• STOREABOUT1100 ■ 
RECORDS PER DISK SIDE IN " 
■JOUBLE DENSITY 

• MUCHMOREi • 




Requirements 

48K (mm) Atari computer 
At least one disk drive 
60 column printer 



REPORTS GENERATED: 

• Purchase Orders 

• Recommended Orders Report 

• Inventory Control Report 

• Product History Report 

• Outstanding Orders by Vendor 

• Monthly Sales and Inventory Level Totals 

• Product Price List 

• Period to Date Sales Report 

• Daily Transactions Report 



Twviat-ij^iftgsr— 



Maintain your book library , 
Organize your recofd collection 
Index your recipes . . . 
Categonze your stamp collection 
Unlimited applications! 



48K Disk 
$49.95 

Includes: 

ON-SCREEN PROMPTS 

HELP SCREENS 

STATE ABBREVIATION TABLE 

PRINTLABELS1.2,or3-UP 

REDEFINABLE FIELDS 

MERGE-CREATE 

COMBINATION FILES 

DELETE DUPLICATE-AUTO or 

MANUAL 




$19.95 

48K. Disk 

SuperMerger makes files from SuperMailer Plus com- 
patible with any word processor (e.g.. AtarWriter. 
Letter Wizard) that uses standard Atari DOS. and 
has a mail-merge function. This means you can de- 
sign a form letter and send it to all the names on your 
SuperMailer Plus mailing list. SuperMerger also al- 
lows you to arrange the data from SuperMailer Plus 
in any sequence that is desired. 



BOOKS 

De Re Atari . S17.90 

Technical Users Noles S26.90 

Kids 8, the Atari $19.95 

Best of Antic $12.95 

Best of Antic w/disk $24.95 

Machine Lang (/Beg .. $14.95 

2nd Bk. of Machine Lang $14.95 

Your Atari Computer . . $17.95 
fvlaster Memory Map 

(350 pg ) $15.95 

Master Memory Map 

(30 pg) $4.95 

Adveniures with the Atari $16.95 

— SUPER 

Gort(C) $ 5.95 

Del Invaders (C) $ 5.95 

Wizard of Wor ((i) $ 5.95 

Krazy Shootout ((i) $ 5.95 

Atari Speed Rd. (T) . . . $19.95 
Invit to Prog #3 (T) $19.95 

Touch Typing (T) . . $14.95 

Baseball AH (T) $15.50 

Crossfire (T) $ 9.95 

Match Racer (D) $ 9.95 

Pathfinder (D) $ 9.95 

Miner 2049er(D) $17.95 



PRINTERS 

Epson LX-80 
Epson FX-80 

StarSG-10 

Axiom SLP . 
SLP Tractor 
Axiom 550 
PrownteraSIOSP 
Prownter 1550 
A(an 1025 
Atari 1027 
Alari850lnlerface 



$259.95 
$395.00 
$269.00 
$199.95 
$29.95 
$279.00 
$399.00 
$499.00 
$239.50 
$199.00 
$139.50 



SPECIALS — 

TnckyTut. 1-12(0) . . ea. $ 7.95 

Pharaoh's Curse (D) $ 9.95 

Ballblazer (0) $25.95 

Buck Rogers (D) $25.90 

Flight Simulator 11(D) ... $33.50 

Pool 400(C) $14.95 

Archon (0) $19.90 

Bk olAlanSW84 $ 9.95 

CompuServe $29.95 

PercomSI Drive $159.95 

130XE $159.95 

520 ST PACKAGE .... $749.05 



• Outsmart Your Friends 

• Outwit The Dragon 

• Join The Quest 



48K Disk 

$39.95 

• Program Covers 
4 Disk Sides 



A new concept in computer gaming. Intellectual chal- 
lenge, strategy and arcade action. Each player assumes 
the role of a lord with a questing party of three charac- 
ters. Complete the quest, earn the most gold by answer- 
ing questions and battling the dragon Win the favor of 
the king and thus, the game. 



TRIVIA QUEST $24 95 
UTILITY EDITOR 48k Disk 

The Trivia Quest Ufility Editor is designed for con- 
venient creation and editing of questions for Trivia 
Quest. Create new music and text questions, or 
change the quesHons that are already available This 
program also includes another 1000 questions for 
use with the Trivia Quest program 



COMPUTER 
RAIACE 



OPEN M-F. 9-6 Sat 10-4 (Pacific Time) 

2I60W llttiAvenue Eugene. Oregon 974 




USE YOUR CREDIT CARD & CALL 

Toll Free 1-800-452-8013 
• ORDERS ONLY, PLEASE • 

There's never a penally lor using your credit card! 
For Information, Call (503) 683-5361 



SHIPPIt^G INFO: IHinimum S2 90 Ground $4 75 Au Actual 
Cost depends on weighl Call (503)663-5361 lorinlormalion 
WARRANTY INFO: Everything that we sell is warrantied by 
ine manuladurer 11 any item purchased Irom us tails lo per- 
(orm properly when you receive il call us al (503) 683-5361 
so thai we can assist you No returned merchandise accepted 
without autho^l^allo^ Delective software will be replaced 
with another copy 0l the same program otherwise no soft- 
ware IS returnable 
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24K Cassette or 
32K Disk 



EDUCATION 





by Larry W. Linson 



Hidden beneath the blue skies, green trees and 
thick underbrush of the deserted planet Leimart, 
there lives the last of a dying breed, a dragon named 
D.B. This somewhat friendly reptile loves children, 
puppies and other neat things . . . and he'd love to have 
you for lunch sometime! 

D.B. has a thinking activity called Dragon's Breath 
ioT yovmg children to play. The activity has two cate- 
gories— Whot COLOR is. . .? and What doesn't be- 
long? Both quiz a child on his or her thinking skills, 
in different ways. 



What COLOR is ... ? asks children to identify the 
color associated with some common (and some not- 
so-common things) in the world around them. What 
doesn't belong? is a classifying activity. Three words 
are listed, such as: Hght, lamp and chair. The child 
needs to identify which of the three words does not 
belong in the group. D.B. keeps score and reports af- 
ter each answer. 

Dragon's Breath may be a bit difficult for some very 
young children to do independently. With the help 
of a parent or older sibUng, though, it will be an en- 
joyable learning experience for any child. 

The program is set down in a fairly logical order. 
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i Dragon's Breath 



continued 



After the title page is displayed , the screen will blank 
for about nine seconds as the new display list is set 
up and special "characters" are redefined. Next, you 
will see the blue skies and lush[?) trees that make 
up the surface of Leimart and, finally, D. B. himself! 
The dragon will introduce himself and then ask 
you to use a joystick to point to the activity you'd 
like to try. After you've selected either What COLOR 
is. . . ? or What doesn't beJong?, press the joystick trig- 
ger, and D. B. will go get the first question. 




Dragon's Breath. 

At the bottom left side of the display are the right 
(yes-) and wrong (no-) running totals for each roimd. 
The question will appear on the left portion of the 
screen, with the three possible answers on the right. 

Using the joystick, move D. B. up or down to your 
choice, then press the trigger to see if you're right! 

If you're not, you may need to have a towel on 
hand. D. B. will keep counting until you have ten cor- 
rect answers, then you can try the other activity. If 
you want to change levels in the middle of a game, 
press the START key, and D. B. will return to the main 
menu . 

It would not be too difficult for someone even re- 
motely familiar with BASIC programming to change 
the questions in this program. It could be a math pro- 
gram, or a history test, or even a trivia quiz . . . I've 
included a listing with trivia questions which can 
be ENTERed into this program; more later. 

To do this on your own, all you need change are 
the DATA statements in Lines 540-880 and 970-1310. 
Be sure to follow the pattern established in each of 
the READ statements (360 and 920). If you're care- 
ful, you could even change the READ statements to 
fit your needs. 



After that, all you'd have to do is change the clues 
in Lines 3050 and 3060, and Dragon's Breath would 
be a program personalized for your own use! (See 
the additional listing at the end of Listing 1 for an 
example.) Be sure to use lower case letters, or you'll 
have little trees, clouds and firehoses all over your 
screen. 

In writing Dragon's Breath, I've borrowed routines 
and ideas from a number of sources. You'll notice 
that, in the program listing, a DIMension statement 
comes before the REM statements identifying the pro- 
gram. 

This is because I used a method called "overlay- 
ing" for the player/missile graphics. It's important that 
this be the first statement entered after your Atari is 
turned on. Atari computers store variables in the or- 
der they were entered. DB$, DB2, FIRE$ and CLEAR$ 
must be stored consecutively, or the method will not 
work. 

As you can see, in this method, the player shapes 
are stored in strings. A more complete explanation 
and tutorial on this method is found in "Atari Player/ 
Missile Graphics Simphfied" [COMPUTE! magazine, 
June, 1983). I like this method because it makes for 
extremely quick vertical motion, which is difficult 
using conventional player/missile programming tech- 
niques. 

Another great feature of this method is ease in 
changing player shapes. Dragon's Breath uses three 
"players," one each for the left and right side of the 
dragon, and a third for the flame/ashes. The two drag- 
on shapes are placed next to each other to make them 
appear as one shape. Each of the players has two 
shapes defined for it, and each is stored as a string. 
The left dragon sides produce the tail "twitch" and 
flapping wings, and the right sides open and close 
D.B.'s mouth. 

The flame and the burning ashes are really the 
same player displaying different shapes. The shapes 
are flipped back and forth to produce an animated 
sequence. This is an extremely versatile and easy-to- 
use player/missile graphics method. 

I used Create-A-Font from ANALOG Computing's 
issue 16 to create the special characters in the pro- 
gram. If you haven't typed in Create-A-Font yet, I sug- 
gest you start right after you type in Dragon's Breath. 
It's well worth the effort. 

I also worked with Create-A-Font's companion pro- 
gram. Font Datamaker (ANALOG Computing, issue 
22), to include the redefined characters made with 
Create-A-Font in my program. 

(continued on page 42J 
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Program description. 

Here's a section-by-section description of the Dra- 
gon's Breath program. I'll point out special features 
of interest as we go along. 

Lines 10-60 — Send program to title screen, 
initialize variables, set up new display list and 
redefine some characters. 

Lines 70-100 — Wing flap routine for dragon. 

Lines 110-180 — D. B. breathes fire here. 

Lines 190-290 — If response is incorrect, D.B. 
gets "hosed" off. 

Lines 300-390 — Randomly select one of the 
question and answer statements and print it on 
the screen. 

Lines 400-490 — Reward sequence. 

Lines 500-520 — D.B.'s tail wag. 

Lines 530-880 — DATA statements for What 
COLOR is. . .? Each statement includes three 
possible answers and the row containing the cor- 
rect answer. 

Lines 890-900 — Clear player image for up- 
coming move. 

Lines 910-960 — Question routine for What 
doesn't belong''' 

Lines 970-1310 — DATA statements for What 
doesn't belong? 

Lines 1320-1760 — Initialization routine for 
the player/missile graphics. DB$, DB2$, FIRE$ 
are the players, which can either have the form 
of D. B. (DB$.DB2$) or be transparent (CLEARS] , 
aiding movement. This section also sets up the 
vertical and horizontal position of D.B. and in- 
cludes the joystick routine for moving D.B. and 
selecting an answer. 

Lines 1770-2060 — Give the child a choice of 
which activity to try. 

Lines 2070-2140 — The ending sequence that 
tells the player how he/she did and sets the pro- 
gram up to go again. 

Lines 2150-2180 — This routine acts as a de- 
lay timer. 

Lines 2190-2370 — D.B. is introduced, and the 
game is described. 

Lines 2380-2390 — Erase the bottom half of 
the screen when needed. 

Lines 2400-2550 — A new display list is de- 
fined, with the top half of the screen in graph- 
ics 2 and the bottom in graphics 0. The screen 
colors are POKEd into place, and the clouds and 
trees are printed on the screen. 

Lines 2560-2920 — New chai-acters ai'e defined 
for use in the program. 



Lines 2930-3130 — Variables are dimensioned 
or defined here, including the title page. Numeric 
variables are used for numbers that come up of- 
ten. Every time a number is used, it takes up 7 
bytes of memory, as opposed to 1 byte for a nu- 
meric variable. I knocked off over 2K (2000 bytes) 
from this program by replacing often-used num- 
bers with variables! 

Trivia test. 

Listing 2 is a series of trivia questions that you can 
add to Dragon's Breath, instead of What COLOR 
is. . . ? If you want to do this, type these line num- 
bers instead of Line 360 and 370, 530-880 and Lines 
3115 and 3125 of Listing 1. 

If you'd like to have both, then you'll need two ver- 
sions of the program. Don't panic; here's how to do 
just that: 

1. Type in the original program. Listing 1. 

2. LIST it to the disk or cassette. 

3. Check the program with Unicheck. 

4. Make any corrections and SAVE it to cas- 
sette or disk as D:DRAGON.l. 

5. Type new, then type Listing 2 into your 
computer. 

6. LIST it to cassette or disk as D:TRIVL\.LIST. 

7. Check this with the appropriate checking 
program. 

8. LIST the corrected version to disk or cas- 
sette. 

9. LOAD D: DRAGON. 1 or CLOAD the program 
from cassette, then ENTER C: or ENTER D:TRI- 
VIA.LST. 

10. Now SAVE D:DRAGON.TRV (for trivia) or 
CSAVE. 

You'll now have two versions of Dragon's Breath — 
the original and the trivia version. 

My thanks go to Charles Bachand and Lee Pappas 
of ANALOG Computing for all their help and sug- 
gestions on my original Dragon's Breath. They forced 
me to try new techniques and to be more creative, 
resulting in a far more entertaining program. D 

Lany W Linson has taught first, second and fourth 
grades, and special education classes, since gradu- 
ating front Miami Lfniversity in Ohio. He uses two 
Atari computers in his fourth grade classroom. This 
is Larry's second program for ANALOG Computing. 
What is it? appeared in issue 20. 



(Variable Table and listings 
start on page 44] 
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MONTHLY MADNESS SALE! 



Sakcti 



...we promise performance 

The SC-100 is designed to work with Apple, Atari, Com- 
modore, IBM-PCjr, and other personal computers. In- 
cludes audio speaker and standard earphone jack; pro- 
vides the most vibrant brilliant colors; tested, proven, 
and rated as the best color monitor available. 

List ^299^^ iVIadness Price M59°° 

So\6 to the first 65 customers 



SC-100 




* monitor cables available for ^7. 




KQ\IARU) TOUCH 1ABLET. 



Video drawing tool. 
Gomes with Koala Painter"" —full 
feature computer graphics program. 
Use the KoalaPad for cursor control, 
graphics, or custom keyboard. 
Educational, entertainment, 
business software available. 
Atari® on Disk. 

Limited quantities! 



List 99^^ 

Madness 

Price 
2995 

^hoala 

Technologies Corporation 




COMPVnif SOFT WARE 



Strategy Games for 
the Action - Game Player 



Madness Price 19^^ 



PUl^^~. 


Gateway 


teApstKli 


.-'.'■'■^.<- 


f-. 




m 


-I"—- 


.0 






PlatterMania 



JtafmanJuier 






(your choice of 3) 



all titles available on cartridge 

* please indicate 4th choice on mail orders 



This offer good while quantities last! 
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ACCESS 

Beach Head (D) $21 

ACTIVISION 

Decathalon(R) $17 

Designer's Pencil (R) . .$17 

Ghostbusters(D) $19 

Pitfall II (R) $17 

River Rald(R) $12 

Space Shuttle (R) $17 

ARTWORX 

Bridge4.0(D) $16 

Compubridge(D) $16 

French (D) $19 

German(D) S19 

Ghostchaser(D) $16 

Italian (D) $19 

Monkeymath(D) $16 

Spanish(D) $19 

Strip Poker (D) $21 

Female Data Disk $16 

Male Data Disk $16 

AVALON HILL 
B-1 Nuclear 

Bomber(D) $16 

Computer Stocks 

& Bonds(D) $19 

Jupiter Mission 

1999(D) $33 

Legionnaire (D) $21 

Maxwell Manor (D) . . . .$19 
Quest of the 

Space Beagle (D) . . .$23 

T.A.C.(D) $27 

Telenguard(D) $21 

BATTERIES INCLUDED 

B-Graph(D) $47 

HomePak(D) $33 

Paperclip (D) Call 

BIG FIVE 

Bounty Bob (R) $29 

Miner2049'er(R) $9 

BRODERBUND 

Arcade Machine (D) . . .$39 

BankSt. Writer(D) . . . .$43 

Championship 

Loderunner (D) Call 

Drol(D) $19 

GumbalKD) $19 

Karateka(D) Call 

Loderunner(D) $23 

Mask of Sun (0) $26 

Operation 

Whirlwind(D) $26 

Print Shop(D) $29 

Print Shop Graphics 

Library (D) $19 

Print Shop Paper 

Refill $14 

Serpent's Star(D) $26 

Spelunker(D) $21 

Stealth (D) $19 

Whistler's 

Brother(D) $19 

CBS 

Astro Grover $23 

Big Bird's 

Funhouse(R) $23 

Big Bird's 

Spc. Delivery (R) . . . .$17 

Coco Notes (R) $9 

Dr. Seuss Puzzler (D) . .$21 



Ernie's Magic 

Shapes (R) $17 

Linear Equations (D) ..$16 

Match Wits (D) $19 

Mult/Division (D) $16 

Quadratic 

Equations (D) $16 

Sesame St. Letter 

Go Round (R) $23 

Webster Word 

Game(D) $19 

CONTINENTAL 

Bookof Adv. Games ..$16 

Home Accountant(D) . . $44 

CREATIVE 

Trolls & 

Tribulations (D) $19 

DATASOFT 

Bruce Lee(D) $23 

Conan Barbarian (D) . . . $23 

Dallas Quest (D) $21 

Letter/Spell 

Wizard(D) $49 

Lost Tomb (D) $19 

Mr. Do(D) $21 

PacMan(D) $17 

Sands of Egypt (D) ... .$19 
TheGoonies ..Get In Line 

Zaxxon(D) $19 

DESIGNWARE 

Creature Creator (D). . .$19 

Math Maze (D) $25 

Spellicopter(D) $25 

Trap-A-Zoid{D) $25 

ELECTRONIC ARTS 

Archon(D) $17 

Archon 11(D) $23 

Cut&Paste(D) $19 

Financial 

Cookbook (D) $29 

Hard Hat Mack (D) $17 

Murder on the 

Zinderneuf (D) $19 

Music Construction 

Set(D) $17 

One-on-One(D) $25 

Pinball Construction 

Set(D) $17 

Realm of 

Impossibility (D). . . .$17 
Seven Cities of 

Gold(D) $25 

EPYX 

Bailblazer(D) $26 

Dragonriders Pern(D) . .$19 
Gateway Apshai (R) . . .$19 

Jumpman (D) $16 

Jumpman Jr.(R) $16 

Pitstop(R) $19 

Puzzle Panic (D) $19 

Rescue on 

Fractalus(D) $26 

SummerGames(D) ...$25 
Summer Games II (D) . . Call 
Temple Apshai (D) . . . .$19 
■ Buy 2 Epyx 
titles & receive 

Jumpman Jr. free 
FIRST STAR 

Astro Chase (D) $16 

Boulder Dash (D) $16 



Spy vs. Spy (D) $19 

FISHER PRICE 

Dance Fantasy (R) .... $16 

Linking Logic (R) $14 

Memory Manor (R) ....$16 
GAMESTAR 

Baseball (D) $19 

Football (D) $19 

HBJ 

Computer SAT (D) ... .$49 

INFOCOM 

Cut Throats (D) $23 

Deadline (D) $29 

Enchanter (D) $23 

Infidel (D) $26 

Hitchhiker's Guide 

to the Galaxy (D). . . .$23 

Planetfall(D) $23 

Seastalker(D) $23 

Sorcerer (D) $26 

Starcross(D) $29 

Suspect (D) $29 

Suspended (D) $29 

Wishbringer(D) $23 

Witness (D) $23 

Zorkl(D) $23 

Zorkllorlll(D) $26 

KOALA 

Light Pen(D) $59 

Touch Tablet 

w/Painter(D) * 

* See our display ad In 

this issue for low, 

low price 
LJK 

Data Perfect (D) $39 

Letter Perfect (D) $39 

Spell Perfect (D) $29 

LEARNING COMPANY 
Bumble Games (D) ... .$25 

Colorasaurus(D) $19 

Magic Spells (D) $23 

Reader Rabbit (D) $23 

Word Spinner (D) $23 

MISC. 

Bear Trap (D) $12 

Crisis Mountain(D) . . .$19 

Fancy Writer (D) $23 

Humpty Dump $19 

Omnitrend Universe ..Call 
Personal 

Accountant (D) $25 

MICROPROSE 

Air Rescue 1 (D) $21 

Crusade in Europe(D) . . $26 
Decision in Desert(D). .$26 
F-15 Strike Eagle (D). . .$23 

Hellcat Ace (D) $19 

Kennedy 

Approach (D) $23 

MIg Alley Ace (D) $23 

NatoCommander(D) ..$23 

Solo Flight (D) $21 

Spitfire Ace (D) $19 

MINDSCAPE 
Bank St. Music 

Writer (D) $33 

Crossword Magic(D) ..$33 
Halley Project — 

A Mission in Our 

Solar System (D). . .$29 



MUSE 

Beyond 

Woltenstein(D) $23 

Castle 

Wolfenstein(D) . . . .$19 
OSS 

Action (R) $57 

Action Tool Kit (D) $26 

Basic XL (R) $49 

Basic XL Tool 

Kit(D) $26 

DOS XL (D) $26 

MAC 65 (R) $57 

MAC 65 Tool Kit(D) . . .$26 
Writer's Tool w/ 

Spell Checker (R) . . .$59 
ORIGIN 

Ultima III (D) $39 

PROFESSIONAL 
SOFTWARE 

Trivia Fever (D) $21 

SCARBOROUGH 

Mastertype(D) $21 

Net Worth (D) $44 

SIERRA ON LINE 

Dark Crystal (D) $25 

Frogger(D) $12 

Homeword(D) $33 

Oil's Well(D) $12 

Ultima 1(D) $23 

Ultimall(D) $39 

Wizard & Princess(D) . .$19 

SPINNAKER 

Adventure Creator(R) . .$17 

Aerobics (D) $23 

Alphabet Zoo (R) $17 

Delta Drawing (R) $17 

Facemaker(R) $17 

Fraction Fever(R) $17 

Hey Diddle Diddle(D) . .$14 

Kids on Keys (R) $17 

Kindercomp(R) $17 

Math Busters (D) $19 

Most Amazing 

Thing (D) $19 

Rhymes & Rlddles(D) . .$14 
Rock'N Rhythm (D) . . .$19 
Snooper Troops 

1 or2(D) $19 

Story Machine (R) $17 

Trains (D) $19 

SPRINGBOARD 

Early Games (D) $23 

Fraction Factory (D) ... $19 

Make A Match (D) $19 

Music Maestro (D) ... $23 
Piece of Cake 

Math(D) $23 

SSI 

Battle Normandy (D) . .$26 

Breakthrough in the 

Ardennes (D) $39 

Broadsides (D) $26 

Carrier Force (D). $39 

Combat Leader (D) ... .$26 
Computer 

Ambush (D) $39 

ComputerQB(D) $26 

Cosmic Balance(D) . . $26 
Cosmic Blance II (D) . .$26 
Eagles (D) $26 



Epidemic (D) $23 

Field of Fire (D) $26 

50 Mission Crush(D) . .$26 

Fortress (D) $23 

Galactic 

Adventures (D) $39 

Imperium 

Galactum(D) $26 

Kampfgruppe(D) $39 

Knights of Desert(D) . .$26 
Objective Kursk (D) . . .$26 
Operation Market 

Garden (D) $33 

Questron(D) $33 

Rails West (D) $26 

Reforger '88(D) $39 

Tigers in Snow (D) . . . .$26 

War In Russia (D) $49 

SUBLOGIC 

Flight Simulator 11(D) . .$33 

Night Mission 

Pinball (D) $21 

SYNAPSE 

Alley Cat (D) $16 

Blue Max 2001 (D) $19 

Electronic Novels . . . Call 

Quaslmodo(D) $17 

Syn-Calc(D) $35 

Syn-Chron(D) $26 

Syn-Comm(D) $26 

Syn-File(D) $35 

Syn-Stock(D) $26 

TIMEWORKS 

Data Manager (D) $16 

Electronic 

Checkbook (D) $16 

Money Manager (D) ...$16 
TRONIX 

Pokersam(D) $17 

S.A.M.(D) $39 

ACCESSORIES 
Ape Face Printer 

Interface $47 

BASFSS, DD $14Bx. 

Bonus Disks Call 

CompuServe Starter 

Kit(5hrs.) $19 

Digital Devices 

U-Print A $57 

Digital Devices A16 

Printer Inteface 

W/16K Buffer $89 

Disk Case (Holds 50) . . .$9 

Disk Drive Cleaner $9 

Dust Covers Call 

Full Stroke Replacement 

Keyboard for AT400 .$49 
Indus GT Disk Drive Cheap 
MPP1000E Microbits 

Modem $79 

Microbits Microprint 

Interface $39 

Microbits MPP1150 

Printer Interface . . . .$54 
Rana 1000 Disk Drive .$179 
Sakata 13" Color 

Monitor $179 

WicoBoss $12 

Wico Bat Handle $19 

Wico3-Way $23 

Wico Trackball $29 



P.O. BOX 278— DEPARTMENT AN WILDWOOD, PA 15091 



•Ordering and Terms: Orders wilh cashier check or money order shipped immediately Personal/company checks, allow 3 weeks clearance. No C.O.D.'s. Shipping: Continen- 
tal U.S.A. -Orders under $100 add $3, Iree shipping on orders over SIOO. PA residents add 6% sales tax. AK, HI. FPO-APO— add $5 on all orders. Sorry — no International 
orders Defective merchandise will be replaced wilh same merchandise Other returns subject to a 15% restocking charge— NO CREDITS! Return must have authorization 
number (412) 3P1-5291 Prices subiect lo change without notice 



CIRCLE #118 ON READER SERVICE CARD 



A 



Dragon's Breath continued 





Variable table. 




DB$,DB2$,FIRE$, 


Store player shapes as strings, holding 


PM,DISP,ADD,PMHI, 


Used in the player/missile graphics 


CLEARS 


either the value of the dragon or of the 


PMLO 


setup. 




blank player. 


MENU 


Tells the program whether it needs to 


DRAGL$,DRAGR$, 


Left side, right side of dragon. 




go to the introduction or the menu. 


DRAGT$JAIL$,DRFR$, 


along with twitching tail and fire 


Y1 


Holds the vertical position of players. 


BOF$,ASH$,BLAST$ 


ball. 


DB,DB-(-1,DB-t-2 


Store locations 53248 to 53250, to de- 


WAIT 


Holds the line number for the routine 




termine the players' horizontal position. 




that acts as a delay in the program. 


QUEST 


The current DATA statement (questions 


Q0,Q1,Q2,Q3,Q4. . . 


Hold value of numbers 0-10 and others. 




and answers) being used. 


FIRE$ 


Any self-respecting dragon has this. 


CAT1$,CAT2$,ICAT1$, 


Hold the title of the CATegories, and 


TGROW 


The TarGet ROW of D.B.'s breath. 


ICAT2$ 


their Inverse counterparts. 


CROW 


Correct ROW, with the right answer. 


TTOP$,TOP$,BOT$ 


Make up the leaves of the trees. 


REWARD 


Routine to reward a correct response. 


TRESTNKS 


Make up the trunks of the trees. 


JIF TICK 


Used as the timer in the WAIT routine, 
JIF holds the amount of time to WAIT. 


BCLD$,MCLD$,LCLDS 


Big, Medium and Little CLouDs. 






DL,Z1,Z2 


Used in the display list routine. 


H20$ 


This cools an incorrect D.B. off. 










CHI,CHSETXFR$ 


Routine from Font Datamaker which 


DBC0L,DBC0L+1, 


Hold memory location 704 (750 and 




redefines special characters. 


DBCOL+2 


706), which determines players' colors. 




RA & WA 


Number of Right/Wrong Answers. 


XTD,K,J 


Used as counters. 


RAL & WAL 


Lines where running totals will print. 


S01,S02 


Hold memory locations 53760 and 


COS 


A blanl< used to Clear Out specific 




53761 to sound wing flap and tail wag. 




parts of the screen. 


WIU 


Used in musical reward for a correct 


QUIZ 


The question routine. 




answer. 


ERASE 


Clears the entire bottom half of screen. 


FLAP 


A routine that literally "wings it." 


DIVIDS 


Line of rocks that DIVIDe the possible 


BLNK 


Clears players for upcoming movement. 




answers from each other. 


AB,BC 


Determine location of FIRES on screen. 


H1$,H2$,AN1S,AN2$, 


Hold questions and answers from DATA 


MKR 


Tells wing flap and fire breath whether 


AN3$ 


statements; check for correct answers. 




introducing the activity or in the game. 



Listing 1. 

le l>IH DB$C128),DB2$fl2S),FIRE$C128),C 

LEAR$ f 128} , DRAeL$ C31) , DRAGR$ 129) , DRAGT 

$ C31) , BOF$ C31) , DRFR$ C29} , TAIL$ C31) 

28 DIH A5H$ C3H . BLflST$ C3U , HFRS C28> 

38 REH ■a;fiWil!IIM;l;l*;H;im 

46 REH IBmS^ 

58 l«IT"2l68:GdsUff 2"4e "gOSUB 2418 :P8K 

E 16,Qe4:P8KE 53774,864 

68 58UND a8,a8,Qe,a8:GeSUB 1788:G8T8 1 

618 

78 REH SDEB 

88 DB2S CYl) =DRAGTS : DB$ f YD =DRAGR$ : JIF= 

Ql:GeSUB HAIT:F8R K=Q6 TS Qe:P8KE 581, 

195: POKE 582, K: NEXT K 

98 G85UB NAIT SPOKE 582,Q8:DB$CY1)=DRAG 

R$ : DB2$ (VI) =DRAGLS : JIF=Q1 : G05UB HAIT : F 

8R K=Qe TO Q6:P0KE 502, K: NEXT K 

188 Ge5UBiMIT:P8KE 502, 08: RETURN 

118 REH msEa 

128 AB=188:BC=168 

138 FSR X=01 T8 Q2:Ge5UB FLAP: NEXT X:D 
B$(V1}=DRFR$ 

148 FOR X=Q8 TO 39 5TEP 02: POKE 502, Ql 
3: POKE 501, X: NEXT X:POKE 501, X: POKE 50 
2,013 

158 P8KE DB+02,AB:P8KE DBC8L*Q2,03e :FI 
RES(Y1)=B0F$:F0R D=Q1 TO 05: NEXT D 
168 FOR X=AB TO BG:POKE DB+Q2,X:NEXT X 
:P05ITION 028,TGR0H:? C8$ : JIF=Q4 :G05UB 
HAIT:FIRE$(Y1}=BLA5T$:G05UB HAG 
178 IF M(R=01 THEN RETURN 
188 IF T GROH =CROW THEN 418 
198 REH [?ra3j 

288 JIF=Q5Tg05UB HAIT:50UND 08,08,08,0 
8jFIRE$=CLEAR$ 

218 P05ITI0N 33,TGR0H:? "HXVZYZ": J1F=0 
15:G05UB HAIT 



220 POKE 501, 03: POKE 502,06 :P05ITI0N 
13,TGR0H:? H20|:P0KE DBCQL, 046: POKE DB 
COL+Ql , 046 : DB2S (YD =TAILI 
230 POKE DBC0L+02,158:JIF=Qie:G05UB HA 
IT 

248 HA=HA+01:P05ITI0N 05, HAL:? HA:JIF= 
Q5:G05UB HAIT 

258 P05ITI0N Q13,TGR0H:? C0$;" " 
:P0KE OBCOL, 032: POKE DBCOL+Ql, 032: POKE 
502,08 
268 PBKE DBC0LHK02,ai4:DB2$(YD=DRAGL$ 
270 FOR D=Q7 TO 015 5TEP 04:P05ITI0N 
26,D:? •' '^NEXT D:POKE 077,08 
288 DBS(YD=DRAGR$:IF QUIZ=978 THEN 94 
8 
298 6810 378 

388 REH ■airaa 

318 Ge5UB ERA5E:P85ITI8N 015,09:? DIUI 

Df:P05ITI0N 015,013:? DIVID5 

328 IML=017:RAL=HAL-Ql:F0R 22=08 TO 03 

5 

338 K=INT(PEEK(53778}KQ35/0256}«018 

348 NEXT Z2:RE5T0RE 0UIZ«K 

358 IF QUIZ=978 THEN 928 

368 READ H1$,H2$,AN1$, AN2$, AN3$,CR8H 

378 P85ITI8N 01,08:? ''What'- : POSITION 

1,018;? "color" :P85ITI0N Ql,012:? Hl$: 

P85ITI0N 01,014:? H2S 

388 P05ITI0N 026,07:? ANlS:P05ITI0N 02 

6,011:? AN2$:P05ITI0N 026,015:? AN3$ 

398 P85ITI0N 01, RAL:? "yes-";RA:P05ITI 

ON 02, HAL4.».J!no-"; HA: RETURN 

488 R£H &IS]3m 

418 JIF=05:G05UB MUIT , 

428 POKE DBHh02,168:P8KE DBC8L+02,08:FI 

RE$ (YD =A5H$ : RA=RA«Q1 : P05ITI0N 05 , RAL : 

? RA:POKE 502,08 
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430 IF RA=Q1 OR RA=Q3 OR RA=fl5 OR RA=Q 

7 OR RA=Q9 THEN RESTORE 460 

440 IF RA=a2 OR RA=Q4 OR RA=:Q6 OR RA=Q 

8 OR Ra=010 THEN RESTORE 470 

450 FOR X=Q1 TO Q20:READ NU:POKE 710, X 

+50: SOUND Qe,l1U,010,Qe:F0R 0=01 TO 010 

:NEXT D:NEXT X:POKE 710,180 

460 DATA 80.80,95,95,95,80,80,113,113, 

113,8,6,100,100,80,86,100,100,95,95,95 

470 DATA 133,133,133,95,100,95,95,142, 

142,108,100,0,0,8,95,95,142,142,133,13 

3 

480 POKE S01,Q0:JIF=02e:G0SUB HAITzDBS 

(YD =DRAGR:$ : FIRE$=CLEAR$ 

490 JIF= Q2e;G 0SUB HAIT:GOTO 1620 

see REH MSnnM 

510 FOR X=Q1 TO 03 :DB2$ (Y1)=TAIL$ : SOUN 
D ae,Q32,Qe,03lF0R D=Q1 to 021:NEXT D: 
DB2S(Y1}=DRAGL$:P0KE S02,Q6 
520 FOR D=Q1 TO Q21:NEXT D:NEXT X:RETU 

RN 

530 REH HilSlU 

540 DATA is the,sun?,yel low,blue,browi 
,7 . . 

550 DATA is the, Sky?, blue, orange, pmk, 

560 DATA are, apples?, brown, grey, red, 15 

570 DATA is 3, footbal 1?, brown, blue, whi 

te,7 

580 DATA is, grass?, red, green, purple, 11 

598 DATA is the, night sky?, green, orang 

e, black, 15 

600 DATA is, snow?, White, black, purple, 7 

610 DATA are, leMons?, green, yellow, blue 

620 DATA are, waterHelons?, black, pink, g 

reen.lS 

630 DATA are, golfballs?, white, black, br 

own, 7 

640 DATA are, elephants?, pink, gray, oran 

ge,ll 

650 DATA are, alligators?, green, blue, re 

d,7 

660 DATA is a, potato?, yellow,brown,bla 

ck.ll 

670 DATA is a, tOMato?, brown, White, red, 

15 ^ - ^ 

680 DATA is a, carrot?, orange, red, pink, 

690 DATA is Cheddar , Cheese?, yel low, red 

, white, 7 

700 DATA is a, 1 iMe? ,yel low, red,green, 1 

5 

710 DATA are, Sharks?, gray, blue, brown, 7 

720 DATA is a, puHpkin?,brown, orange, bl 

ue,ll 

730 DATA is a, swan?, browi, yellow, White 

,15 

740 DATA are, oceans?, blue, red, black, 7 

750 DATA are, bananas?, yellow, black, blu 

e,7 

760 DATA is grape, jel ly?, blue, purple, g 

reen,ll 

770 DATA is peanut , butter?, black, pmk, 

brown, 15 , . .^ 

780 DATA is, butter?, yellow, purple, Whit 

e,7 

790 DATA is, lettuce?, black, green, orang 

880 DATA is a, radish?, brown, yel low, red 

,15 

810 DATA are, basketballs?, orange, black 

.White,? 

820 DATA are, Stop signs?, blue, red, yell 

ov,ll . . ^. 

838 DATA are, car tires?, brown, pink, bla 

Ck 15 

840 DATA is strawberry , jel ly?, blue, red 

, green, 11 

ANALOG COMPUTING 



850 DATA is a, basebal 1?, blue, black, whi 

te,15 

860 DATA are,clouds?, yel low. white, red. 

11 

870 DATA is a, cardinal?, red. blue, black 

,7 

880 DATA is a, hockey puck?, red, brown, b 

lack, 15 

890 REM aiaaa^ * * * 

900 DB$=CLEAR$ : DB2$=CLEAR$ : FIRES=CLEAR 

S : RETURN 

910 REN IHiliM:iliM5iaWii:M 

920 READ AN15,AN2$.AN3$,CR0H 

930 POSITION 01.07:? "What" : POSITION 

1.018:? "doesn't": POSITION 01,013:? "b 

elong?" 

940 POSITION 01,RAL:? "yes-";RA ZPOSITI 

ON 02. HAL:? "no-";MA:JIF=QO 

950 POSITION 026.07:? AN1$:G0SUB WAIT: 

POSITION Q26.011:? AN2S:G0SUB HAIT 

960 POSITION 026.015:? AN3S: RETURN 

970 DATA car. dog, truck. 11 

980 DATA blue. red. book. 15 

990 DATA radio, flower, tree, 7 

1000 DATA piano, Shoe, truMpet, 11 

leie DATA diMe, penny, bat, 15 

1020 DATA paper, orange, waterHelon, 7 

1030 DATA pencil,tv,pen,ll 

1040 DATA shirt, sweater, picture. 15 

1050 DATA coHputer,horse,cow,7 

1060 DATA snow, sand, ice, 11 

1070 DATA ball, bat, Hatches, 15 

1080 DATA elephants, COWS, pigs, 7 

1890 DATA robins, penquins, eagles, 11 

1180 DATA water, Hi Ik, haH, 15 

1110 DATA bowl, glass, cup, 7 

1120 DATA pants, blanket, socks. 11 

1130 DATA grass, lettuce, rocks, 15 

1140 DATA table, OMen, fire, 7 

1150 DATA chair. wall, sofa, 11 

1160 DATA horse, bike.light. 15 

1170 DATA table. printer. Honitor, 7 

1188 DATA glasses. soap. belt, 11 

1190 DATA trunk. box, Show, 15 

1200 DATA fork, bowl, dish, 7 

1210 DATA run, have, walk, 11 

1220 DATA talk, Sing, run, 15 

1230 DATA pants. blanket. socks, 11 

1240 DATA tonato, glove, apple, 11 

1250 DATA coat, Shirt, quilt, 15 

1260 DATA hippo, cat, dog, 7 

1270 DATA apple, Chair, desk, 7 

1280 DATA car. dog, truck, 11 

1290 DATA apple, pear, Chair, 15 

1300 DATA horse. house. cabin. 7 

1310 DATA socks, S hoes. hat. IS 

1320 REM l:B!»ii;i*< 

1330 RESTORE 1340: FOR X=01 TO 029: READ 

T : DRAGrI (X) =CHR$ CT) : NEXT X 
1340 DATA 0.0.240.217.255.252.255,113, 
0,128.128,193.254.254,241.240,248.252. 
254,254.254.252 

1350 DATA 248.240,192,192,128,8,8 
1360 FOR X=01 TO Q29:READ T:DRFR$(X)=C 
HRSCT):NEXT X 

1370 DATA 0,0,241,219,252,248,252,115, 
1,128,128,193,254,254,241,240,248,252, 
254,254,254.252 

1380 DATA 248,240,192.192.128.8.0 
1390 FOR X=Q1 TO 031: READ T:DRAGL$(X)= 
CHR$(T) :HEXT X ,^ „ 

1400 DATA 0,0,3,15.7.15.7.143,71,175,8 
7,47,87,143,135,207,103,111,231,207,25 
5,255,127,7,3,31,31,24,28,0.0 
1410 FOR X=Q1 TO 010: READ T:BOF$CX)=CH 
R$ (T) : NEXT X 

1420 DATA 0.0,10,85.171.10,0,0,0.0 
1430 FOR X=Q1 TO 010: READ T:ASH$(X)=CH 
R$(T} :NEXT X 
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1440 DATA e, 72, 36, 72, 36, 8, 68, 126, 255, 8 

1450 FOR X=Q1 TO Q31:READ T:DRAGT$tX}= 

CHR$CT) :NEXT X 

1468 DATA 8,8,3,15,7,15,7,15,7,15,7,47 

,87,207,103,143,103,111,231,287,255,25 

5,127,7,3,31,31,24,28,8,8 

1478 FOR X=01 TO Q31:READ T:TAIL$(X)=C 

HR$CT):NEXT X 

1480 DATA 0,0,3,15,7,15,7,143,71,175,8 

7,47,87,31,23,63,183,111,231,287,255,2 

55,127,7,3,31,31,24,28,8,8 

1498 F8R X=Q1 TS Q18:READ T:BLA5T$CX)= 

CHRS CT) iNEXT X 

1588 DATA 136,2,48,181,24,189,168,84,2 

,136 

1518 CLEARS=CHR$CQO) : CLEARS €128) =CLEAR 

$ : CLEARS CQ2) =CLEARS 

1528 A=Q4«CINTCPEEKC742)/Q4)-Q1) :POKE 

542 79, A 

1548 N=Q25e«PEEKC135)+PEEKC134) :K=a256 

«PEEK C141) +PEEK C148) 

1558 X=Q256«A+512 : DISP=X-K : ADD=Q2 

1568 FOR T=Q1 TO 03 

1570 PHI1I=INTCDISP/Q2563 :PI1L0=DISP-Q25 

6«PHHI 

1580 POKE N«ADD,PNLO:POKE N+ADD+Q1,PMH 

I : DI5P=DISP4128 : ADD=ADD+a8 

1598 NEXT T 

1688 IF NENU>Q1 THEN 1798 

1618 GOSUB ERASE: POKE 764,255: POKE DB, 

Q98:P0KE DB+01,Q98:P0KE DB+Q2,Q87 

1620 IF RA=Q5 THEN ¥1=030 :N=140: GOSUB 

ERASE: POSITION Q9,Q18:? "you're halfva 

y done!": GOSUB BLNK: GOSUB 1990:Y1=86 

1638 IF RA<Q18 THEN GOSUB QUEST :DBSCY1 

) =DRAGR$ : DB2S CYll =DRAGL$ 

1640 IF RA=Q10 THEN DBS=CLEAR$:DB2S=CL 

EARS :FIRES=CLEAR$: GOTO 2088 

1658 IF STRIG 1081=00 AND Yl>=aee AND V 

1<=Q64 THEN TGR0H=a7: GOSUB FLAHE 

1660 IF Yl=070 OR Yl=82 OR Vl=09e THEN 

GOSUB FLAP 
1670 IF STRIG COO) =00 AND Yl>=76 AND Yl 
<=80 THEN TGR0II=Q11: GOSUB FLAME 
1680 IF STRIG COO) =00 AND Yl>=92 AND Yl 
.^rS^*,!"^'' TGR0H=Q15: GOSUB FLAHE 
1690 IF PEEKC53279)=Q6 THEN POP :RA=QO 
:HA=RA:Yl=88:GesUB ERASE :G8SUB 1758: GO 
SUB 1818:G8T0 1618 

1700 IF STICK COO) =014 THEN Y1=Y1-Q2 
1718 IF STICK (08) =013 THEN Yl=Yl+02 
1720 IF Y1>Q96 THEN Yl=096 
1730 IF YK060 THEN Y1=Q60 
1740 DBS CYl) =DRAGRS : DB2S CYl) =DRAGLS : GO 
TO 1650 

1758 GOSUB BLNK:P0KE 08,078 :POKE DB1-01 
,062: POKE DB+02,Q59 
1768 DBS CYl) =DRAGRS : DB2S CYl) =DRA6TS : RE 

1778 REH [^-MAm-Xi 

1788 POKE 752,01:MENU=02:G0TO 1320 

1790 GOSUB 2208 

1888 NKR=Q1:AB=88:BC=128:G8SUB 138:G0S 

UB HAIT:FIRES=CLEARS 

1818 GOSUB ERASE: POSITION 05,07:? "her 

e are your choices — " 

1820 JIF=Q20: GOSUB MAIT:HKR=00 

1838 POSITION 08,018:? CATlS: JIF=028 : G 

8SUB HAIT 

1848 POSITION 08,014:? CAT2S: JIF=02e : G 

OSUB HAIT: POKE 08,070: POKE DB+01,062:P 

OKE DB+02,059:JIF=035 

1850 IF STICK COO) =013 THEN Yl=Yl+02 

1868 IF STICK COB) =014 THEN Yl=Yl-02 

1870 IF Yl>94 THEN Yl=94 

1888 IF Yl<72 THEN Yl=72 

1890 IF YK077 THEN POSITION 08,018:? 

ICATlS: POSITION 08,014:? CAT2S 



1900 IF Yl>087 THEN POSITION 08,014:? 
ICAT2S: POSITION 08,010:? CATlS 
1910 IF STRIG COO) =00 AND Yl<077 THEN D 
BS CYl) =DRFRS: GOTO 1950 

1920 IF STRIG COO) =00 AND Yl>087 THEN D 
BS CYl) =DRFRS: GOTO 1960 

1938 IF Yl=78 OR Yl=88 THEN GOSUB FLAP 
1948 DBS CYl) =DRAGRS : DB2S CYl) =DRAGLS : GO 
TO 1850 

1950 POSITION 01,014:? C0S;C0S:QUIZ=54 
8: GOTO 1978 

1968 P8SITI0N 01,010:? C0S;C0S:QUIZ=97 
8 

1978 FOR X=01 TO 03: GOSUB HAG: NEXT X 
1988 JIF=Q48:G8SUB HAIT:G8SUB ERASE :N= 
97 

1998 Z1=062:Z2=059:P0KE DB, 070: POKE DB 
+01, Zl: POKE DB+02,Z2 

2808 GOSUB BLNK : DBS CYl) =DRFRS :DB2S CYl) 
=DRAGLS 

2810 FOR X=070 TO N:Z1=Z1+01:Z2=Z2*01 : 
POKE DB,X:POKE DB+01,Z1 :P0KE DB+Q2.Z2 
2020 IF X=76 OR X=84 OR X=92 THEN GOSU 
B FLAP 

2838 IF X=098 OR X=110 OR X=118 OR X=l 
25 OR X=132 THEN GOSUB FLAP 
2848 NEXT X 

2850 IF RA=08 THEN POKE DB, 098: POKE DB 
+01,090: POKE DB+02, 087: GOTO HAG 
2868 GOSUB BLNK: POKE DB, 098: POKE DB+Ql 
, 098 : POKE DB+02 , 087 : RETURN 
2878 REM [^ 

2888 GOSUB ERASE: POKE 752,01: POKE 764, 
255 :X=QO 

2898 POKE DB, 070: POKE 08+01,062: POKE D 
8+02 , 059 : Y1=Q70 : DBS CYl) =DRFRS : DB2S CYl) 
=DRAGLS 

2108 POSITION 07,09:? " you scored 
";RA;" correct,":? :? " out 

of ";HA+RA;" probleits!" 
2110 ? :? " press any key to try 

again,":? :? " or to change le 
vels" 

2120 GOSUB HAG: GOSUB HAIT 
2130 IF PEEK C764) =255 THEN 2128 
2140 HA=Oe:RA=HA:POP : GOSUB ERASE: GOSU 
B 2210 : G0SUB„1818 : GOTO 1610 
2158 REM |93ul 

2168 FOR D=01 TO JIF:TICK=PEEKC02e) 
2170 IF TICK=PEEKC028) THEN 2178 
2188 NEXT DJRETURN 
2198 REM WSSE 

2200 POKE 0559, 34: POKE 0559, 046: POKE 5 
3277, 03: POKE 623,01 
2210 GOSUB BLNK: POKE DB, 078 :Yl=8e: POKE 

DB+Ql, 062: POKE DB+Q2,059 
2220 POKE DBCOL, 032: POKE DBC0L+Ql,a32: 
DBS CYl) =DRAGRS : DB2S CYl) =DRAGLS 
2230 JIF=035: GOSUB HAIT 
2240 MKR=Q1 : TGR0H=09 : AB=88 : BC=128 : G8SU 
B 138:G8SUB HAIT:FIRES=CLEARS 
2258 POSITION 015,09:? "h i ther e !.":P0 
SITION 017+01,011:? "i'H EflSHi ■" 
2260 DBS CYl) =DRFRS:JIF=Q28: GOSUB HAIT 
2270 FOR X=Q1 TO 03: GOSUB FLAP: GOSUB H 
AIT: NEXT X 

2288 GOSUB HAIT : DBS CYl) =DRAGRS 
2290 FOR X=Q1 TO 03: GOSUB HAG: NEXT X 
2300 JIF=Q87:G8SUB HAIT: DBS CYl) =DRAGRS 
: GOSUB ERASE 

2310 GOSUB 138: GOSUB HAIT:FIRES=CLEARS 
2328 POSITION 012,07:? "i'w going to a 
sk": POSITION 015,09:? " you soHC guest 
ions." 

2330 POSITION 012,011:? "use your joys 
tick ":P0SITI0N 015,013:? "to point to 

the ones " 
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CIRCLE #124 ON READER SERVICE CARD 



: cieej -«5 : chset^ cpeek 



2340 POSITION 012,015:? "you would lik 
e! ":dbScyi>=drfrS 

2358 FOR K=Q1 TO 03:G05UB IMG: NEXT X 

2360 FOR X=01 TO Q6:G0SUB FLAP:GOSUB H 

AIT: NEXT X 

2370 JIF= Q25;G 05UB HAIT :DB$fY13=DRAGRS 

2380 REH aiEBM 

2390 FOR D=Q5 TO Q20:P05ITI0N 01, D:? C 

0« ; COS : NE XT D: RETURN 

2400 REH l>».1Jf-|'a»Hl 

2418 GRAPHICS 08: POKE 0559,Q8:G05UB 25 

78:G05UB 2460: POKE 752,01 

2428 POKE 0559,34: POKE 708, 52: POKE 789 

,124:P0KE 711,184:P0KE 718,188:P0KE 71 

2,114 :P0KE 756,CH5ET/0256 

2430 POSITION 08, Q2:? TOP$;BOT$ :POSITI 

ON 06,03:? TRE$: POSITION 08,04:? TNK$ : 

POSITION 028,01:? TTOPS 

2448 POSITION 02,08:? BCLD$;" ";LCLDS; 

•' ";MCLD$;" ";BCLDS;" ";MCLD$j 

2458 ? BCLDS;" 'S'LCLDS;" "jMCLD 

$: RETURN 

2468 GRAPHICS 00: POKE 0559,00 

2478 DL=PEEKC56e)+0256«PEEKf561J 

2488 Zl=PEEKCDL+04} :Z2=PEEK CDL+QS) 

2498 X=01: RESTORE 2558 

2588 READ A: IF A=08 THEN RETURN 

2518 POKE CDL+X-Q1),A 

2528 IF X=Q5 THEN POKE DL+04,Z1 

2538 IF X=06 THEN P8KE 0L+05,Z2 

2548 X=Xt01:G0T0 2588 

2558 DATA 112,112,112,78,56,79,6,6,6,6 

,6,6,6,6,6,2,2,2,2,2,2,2,2,2,2,2,2,2,2 

,65,32,156^8 

2568 REM [illLLMUJ.* ! 

2578 POKE 1867PEfK< 

tie6)-»Ql)«0256 

2588 D=CHSET/Q256:P0KE 283, 08: POKE 284 

,D 

2598 RESTORE 2688: FOR N=01 TO 28: READ 

K : XFRS CN) =CHR$ (K) : NEXT N 

2688 DATA 184,169,8,133,285,168,169,22 

4,133,286,177,285,145,283,288,288 

2618 DATA 249,238,284,238,286,165,286, 

281,228,288,239,96 

2628 X=USRCADRCXFR5)}: RESTORE 2638 

2638 READ A: IF A=-Q1 THEN RETURN 

2648 FOR Zl=08 TO 07: READ Z2:P0KE CHSE 

T+A«084^Z1,Z2:NEXT Z1:G0T0 2638 

2658 DATA 5,8,8,8,255,255,8,0,8 

2668 DATA 6,8,8,8,255,255,255,8,8 

2678 DATA 11,64,32,128,8,128,32,8,128 

2688 DATA 33,5,7,7,6,7,7,15,31 

2698 DATA 34,96,224,224,224,224,168,24 

8,248 

2788 DATA 35,3,3,3,3,3,2,3,7 

2718 DATA 36,192,192,192,192,192,64,19 

2,224 

2728 DATA 37,5,26,21,43,57,18,29,5 

2738 DATA 38,85,186,149,187,89,218,169 

,85 

2748 DATA 39,138,81,54,64,118,48,145,1 

78 

2758 DATA 48,168,184,80,168,216,32,216 

,112 

2768 DATA 41,8,8,8,8,5,55,90,213 

2778 DATA 42,8,8,8,8,168,119,170,181 

2788 DATA 43,181,149,235,178,213,90,55 

*5 

2798 DATA 44,149,43,237,83,181,178,118 

,168 

2888 DATA 45,1,3,3,3,3,2,3,3 

2818 DATA 46,192,192,64,192,192,192,19 

2,192 

2828 DATA 47,6,31,47,118,127,125,55,7 

2838 DATA 48,224,248,184,222,254,228,2 

36,112 

2848 DATA 49,8,7,29,27,31,14,8,8 



2858 DATA 58,48,248,216,232,248,112,8, 

8 

2860 DATA 51,28,114,112,63,127,112,58, 

28 

2878 DATA 53,8,183,223,223,247,63,55,3 

2888 DATA 54,0,224,188,126,242,188,236 

,8 

2898 DATA 55,8,8,7,127,127,7,8,8 

2988 DATA 56,0,8,192,228,223,223,3,8 

2918 DATA 57,8,8,3,31,255,248,128,0 

2928 DATA 58,8.8.8.22 4.248.127.15.8.-1 

2938 REH OTfimMsA MS 

2948 REST0RE3148TREAD 01,02,03,04,05, 

06,07,08,09,018,011,012,013,014,015,01 

7,019 

2958 READ 020,021,025,026,029,038,031, 

032,035,046,048,059,068,062,064,070 

2960 READ 077,087,098,096,098,0256,055 

9,501,S02 

2978 GRAPHICS 00: POKE 752, 01 :DL=PEEK C5 

68) +PEEK €561) «0256 : DL=DL+Q5 

2988 POKE DL+Q5,07:P0KE DL+06,07:P0KE 

DL«Q12.Q6:P0KE DL+013.0e 

2998 POKE DL+28,65:P8KE DL+Q29,PEEK C56 

83: POKE DL+038, PEEK 1561):? CHRi(125) 

3888 POKE 708,014: POKE 718, 048: POKE 71 

2,048:? "A.N.A.L.O.G. Presents .. .":FOR 

D=Q1 TO 158: NEXT D 
3818 POSITION 03,05:? "DRAGON'S BREATH 
":POSITION 06,06:? "ffeaturing ";CHRS 
C34>;"D.B.";CHR$C34);" the dragon)" 
3828 POSITION 05,011:? "a thinking":PO 
SITION 025,011:? " activity" 
3838 POSITION 07,017:? "CO 1985 ~ La 
rry H. Linson" 

3848 DIH C8SC019),CAT1$C021),CAT2$(025 
),ICAT1$CQ21),ICAT2SCQ25);CAT1S=" 1. W 
hat color is... ":FLAHE=120:FLAP=88 
3858 CAT2 $=:" 2. What doesn't b elong? 
: ICAT1$="| 
3868 ICAT2$="| 
":COS=" 

3078 ERASE=239e : DB=53248 : BLNK=:908 : DBCO 
L=7e4 : 0UEST=318 : HAG=518 

3888 DIH TOP$C028).TRE$C39),BCLD$C02), 
MCLD$ C02) , BOT$ f 028) , LCLD$ C02) , TNK$ C019 

lsirTU^^' km^ai.u . u .u iii.a " : TRES 

=" MNHN MN HNHN HNHN CDMN HN CDNN M 

NHN" 

3188 B0T$="gBI!im3»lill!liaiaa!na" : TTOPS 



3110 BCLDS="op" : I«:lD$="uu" : LCLDS="qr" : 

TNKS=" ABCD CD ABCD CDHN" 

3120 DIH Hl$fQ28),H2$f021),ANl$CQ15),A 

N2$ C015) . AN35 C015) , DIVIDS C025] 

3138 H20S="S3y.Y.y.Y.Y.y.y.Y.Y.y.y.Y.Y.Y.y.y.Y.Y." : DIMID 

S="ORORQRQRORQRQRORQRQROROR" : FOR D=01 

TO 0559: NEXT D: RETURN 

3148 DATA 1,2,3,4,5,6,7,8,9,18,11,12,1 

3,14,15,17,19 

3158 DATA 28,21,25,26,29,38,31,32,35,4 

6,48,59,68,62,64,78 

3168 DATA 77,87,98,96,98,256,559,53768 

,53761 



CHECKSUM DATA. 

(see page 30] 

18 DATA 278,65,354,284,889,251,761,812 

,138,962,171,63,478,749,197,6348 

168 DATA 664,468,552,788,211,158,993,6 

16,154,39,993,918,185,737,412,7784 



1 . What color is . 



. what doesn 



belon' 



ANALOG COMPUTING 
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310 DATA 872,300,223,722,272,443,617,4 

82,169,530,963,12,581,765,410,7361 

460 DATA 90,885,183,258,80,47,459,249, 

501,912,640,466,645,635,929,6979 

610 DATA 322,949,141,767,326,731,228,8 

63,559,680,691,637,118,651,181,7844 

760 DATA 245,515,555,698,93,621,977,64 

2,475,475,320,244,919,218,110,7107 

910 DATA 672,794,727,821,547,605,247,2 

95,235,565,497,118,43,220,210,6596 

1060 DATA 158,794,616,987,474,391,562, 

574 , 581 , 822 , 861 , 974 , 84 , 444 , 240 , 8562 

1210 DATA 155,222,566,324,35,257,897,1 

58,848,869,819,438,403,532,653,7176 

1360 DATA 515,552,656,870,737,158,811, 

165,53,877,149,516,451,898,536,7944 

1510 DATA 81,417,212,302,621,902,536,5 

41,432,602,616,691,77,187,583,6800 

1670 DATA 983,158,73,356,354,163,110,5 

54 , 576 , 659 , 598 ,566,955, 695 , 51 , 6851 

1820 DATA 284,148,427,361,365,0,981,46 

3,473,375,384,658,564,478,64,6025 

1970 DATA 743,836,574,643,517,575,526, 

535,990,619,492,930,359,645,816,9800 

2120 DATA 705,848,362,74,453,866,863,4 

07,124,329,561,198,17,173,94,6066 

2270 DATA 474,939,726,808,988,606,296, 

845,725,482,53,369,542,81,61,7995 

2420 DATA 7,968,251,300,729,729,534,21 

1,77,624,133,139,762,90,808,6362 

2570 DATA 432,206,839,312,845,732,394, 

679,567,631,176,360,824,289,857,8143 

2720 DATA 994,427,502,556,393,943,539, 

688,281,863,264,665,411,235,488,8169 

2870 DATA 50,534,429,923,712,8,988,408 

,775,622,994,867,895,46,856,9107 

3820 DATA 637,205,697,519,177,884,521, 

999,538,365,707,262,329,13,779,7632 



TRiyiA LISTING 



*5 REN ^- — .,,— ....^ 

i*CR0M*" ' "^* ' ""'""* , flmiS , AN2$ , AII3 

?2®,'*2H^J2? 01'««!? H1$:P05ITI0II Q1,Q 
M «l,"l4l? H™" *'^'«"'' H3S:P05ITi0 
530 REH OaSiE] 

riS+^fiTS..'*!?f3'^"*"?*'*i''*s longest, in 

ilS^iXil" ' ?*f "^ { Monkey , torto i se , 15 

550 DATA what letter, is least, used in, 

our language?, z,q,x, 11 

560 DATA how Many, nail holes, in a stan 

dard, horseshoe?, 8, 12, 15, 7 

570 DATA who created, wierd harold,and, 

fat albert?, woody alien, bill cosby,edd 

580 DATA Who is only, president carved, 
in Mt. rushNore, Hearing glasses?, kenne 
dy , roose ve 1 1 , wash i ngton , 11 
590 DATA Who is,fred flintstone's,best 
,friend?,betty,dino, barney, 15 
®f 2,£S^* - If**^^ travels, through space, at 
66700, Miles per hour?, earth, the sun,t 
he MOon,7 

610 DATA what, state, receives the, least 
=5H"St;i?*?''*^»"®'3*3ska,indiana,ll 
SIS S9I2 how, Many, feet in, a Mile, 250, 5 

ZoO , 9879 ,11 

630 DATA Who, was the, tallest, president 
?,reagan, Johnson, Iincoln,l5 
640 DATA which of your, senses is, less 
sharp after, a big Meal?, hearing, sight, 
taste, 7 



650 DATA how Many, bowling balls, does i 

t take, to Make a spare?, 1,2, 3, 11 

660 DATA what was, first known, as the,p 

luto platter?, the hot dog, the frisbee, 

a 45 record, 11 

670 DATA what is, captain Marvel 's, Magi 

SiX'*I^5li''"F"= Pocus, please, shazaM, 15 

680 DATA what is, the, largest, cat?, tige 

r, lion, cheetah, 7 

690 DATA how Many, calories in, a glass. 

Of water?, 5, 0,10, 11 

700 DATA what is the,Host southern, sta 

*?.*9i,.**»*'"' = ''' Florida, California, haw 
ax 1, 15 

710 DATA what is, the best, selling week 
iSi^f 321 * P*' , t i Me , t V guide, peop l e , 11 
Z^?«ES^?,t2"ji?^"5''y*'**'s in, a Mile?, 528 

0,1000,1760,15 

730 DATA Who, invented the, pot-belly, St 

ove, franklin, edison, jef ferson,7 

740 DATA What is, the world's, fastest, d 

og? , doberMan , greyhound , pood l e , ii 

ve? %'^2^4^7^ Many, Wings, does a, flea ha 

760 DATA what, is, a, wallaby?, whale, kang 

aroo, f ish,ll 

770 DATA what, aniMal, lives in a, lodged 

, Moose, bear, beaver, 15 

780 DATA what Hoves,away froM earth, on 

tii inch, each year?, the Moon,venus, 

790 DATA what's the, only day,naMed for 

, a p lanet? , sunday , Monday , Saturday , 15 

880 DATA what, aniMals, travel, in pods?. 

Monkeys, Whales, birds, il f-a^., 

810 DATA what is, a group, of bears, call 

ed?,a group, a band, a sleuth, 15 

820 DATA what's the, brightest, planet s 

een,froM earth?, venus, Mars, the Noon,7 

830 DATA who is, luke,skywalker 's, fathe 

QiA^S^Si**?'"'^*' vader,ben kenobi.ll 

848 DATA how Many, reindeer, pull santa' 

s, sleigh?, 6, 10, 8, 15 

858 DATA Who iS,b3tMan'S,Side,kiCk?,t0 

nto, robin, baMbi, 11 

860 DATA how Many, legs does, a spider, h 

ive?.8.6,l2,7 

870 DATA who fbesides, grant) is, buried 

in, grant's toMb?, grant's wife, grant's 

sons, no one, 7 
880 DATA what part, Of a, face has, 550 h 
airs?, Mustache, beard, eyebrow, 15 
3115 CAT1$=" 1. trivia test ":ICAT1$=" 



1. trivia test 



3125 DIM H3SCQ21) , H4$ CQ21> 



CHECKSUM DATA. 

(see page 30] 

45 DATA 365,188.655,521.372,768,613,17 
8,105,342,590,2i3,4*l,9i9,8S3,7l85 

i!?4S?|g5!«li?Sii?6l^Mi^5i5^ ^« ' '^ ' ^ 

??§9?§?g,iJ:iy4'"'"''""'"'^^^''" 
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CIRCLE #124 ON READER SERVICE CARD 



16K Disk only 



UTILITY 



Q 



Resident 
DOS 2.0 Mod 



A permanent 
RAM resident DOS 2.0 modifier 



by James G. HoUinger 



Have you ever gotten tired of waiting for the DUP. 
SYS file to load whenever you go to DOS? Or have 
you ever gone to DOS thinking MEM.SAV was on 
your disk, only to discover later that it wasn't and 
you've lost your program? If these have ever happened 
to you , or if you want to make sure they don't (and 
if you can spare 5K of user memory) , then take a look 
at this permanent RAM resident DOS modifier, Resi- 
dent DOS 2.0 Mod. 

What the modifier does. 

Resident DOS 2.0 Mod is a BASIC program which 
modifies version 2 .0 of DOS (Disk Operating System] 
and DUP (Disk Utility Package) on any Atari com- 
puter, so they'll both load in when you turn on your 
computer. MEMLO is also changed, so BASIC or oth- 
er programming languages like MAC/65 will place 
your program after DUP. This will, however, decrease 
the amount of user memory by about 5000 bytes. 

These modifications will enable you to call DOS 
without losing your program and without having to 
wait for DUP to load in. The DOS menu will be dis- 
played instantly. The only way your program can be 
erased is if you use the Copy File, Duplicate File or 
Duplicate Disk commands, allowing DOS to use the 
program area as a buffer. 

ANALOG COMPUTING 



MEM.SAV is no longer needed, unless you attempt 
to load a binary file without a run address on top 
of DUP, in which case MEM.SAV will be used if it's 
present on the disk in drive 1. 

How to use it. 

After typing in and SAVEing the Resident DOS 2.0 

Mod program, RUN it. The message Modifying. . . 
will be displayed. After a few seconds, the DOS mod- 
ifications will be complete. 

Type DOS, and the DUPSYS file will be loaded 
into memory from disk. The DOS 2.0 menu will be 
displayed. Type M to run at address and enter 600 
when asked for the run address. The DUP modifica- 
tion subroutine will then be executed, and the DOS 
2.0 menu will again be displayed. This subroutine 
must be executed, or the computer will not boot up 
properly. 

All modifications to DOS and DUP will now be 
completed, and you can write the DOS files to disk. 
To return to BASIC, push the SYSTEM RESET key 

Whenever you turn on the computer and the disk 
in drive 1 has the modified DOS on it, a message 
will be displayed informing you that the DOS has 
been modified. The only noticeable differences be- 
tween the modified DOS and the regular DOS 2.0 
will be that 5K loss in user memory. The DOS menu 
will be displayed immediately after you've executed 
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continued. 



the DOS command, and the user program will still 
be in memory after you've exited DOS, without the 
need for the MEM.SAV file. 

If DUP is ever overwritten in memory by loading 
a binary file on top of it, or because of a program, 
you can reload DUP by making a USR call to 5936 
or an Assembly language JMP to $1730. 

It would be advisible to leave at least one copy of 
the DOS files unmodified, in case you should need 
the extra 5K of memory — or if a program should re- 
quire an unmodified copy of DOS 2.0. D 

James G. HoJJinger is a 16-year-Q]d honor student 
in high school. He has been programming for five 
years, starting with BASIC on an Interact computer. 
He now uses an Atari 800 and an Apple 11+ with 
BASIC, Assembly language, FOBTH and C. 

Listing 1. 
BASIC listing. 



Pernanent RAM Resident 
l>05 Modifier 



By 



Janes G. Hoi linger 
1984 



le REM 
28 REM 
30 REM 
40 REM 
SO REM 
60 REM 

70 REM 

80 ? :? "Modifying..." 

90 REM 

180 REM 5ET5 DOS IMIT ADR 

110 REM 

120 POKE 1796, 48: POKE 1797,23 

130 REM 

140 REM SETS MEM LOW 

150 REM 

160 FOR 1=0 TO 6 

170 READ a: POKE 2147+1, A :NEKT I 

180 REM 

190 REM INSERT A JSR 

200 REM 

210 POKE 5482,32 

220 POKE 5483,194:P0KE 5484,23 

230 REM 

240 HEM SETUP ROUTINE 

250 REM 

260 FOR 1=0 TO 11 

270 READ A SPOKE 5935+1, A : NEXT I 

280 REM 

290 REM PRINTS BOOT MESSAGE 

300 REM 

310 FOR 1=0 TO 46 

320 READ A: POKE 6059+1, A: NEXT I 

330 FOR 1=0 TO 27 

340 POKE 6ie6+I,PEEKCADRC"DUP wont era 

se user prograM.")+l) :NEMT I 

350 POKE 6134, 155: FOR 1=0 TO 28 

360 POKE 6202+1, PEEKCADRC"ThiS DOS has 

been Modified to"} +I): next I 
370 POKE 6231, 155: FOR 1=0 TO 25 
380 POKE 6232+1, PEEK CADRC"perHanently 
reside in RAM. ") +l] : NEXT I 
390 REM 

400 REM RESETS DOS INIT ADR 

410 REM 

420 FOR 1=0 TO 6 

430 READ A: POKE 6145+1, A: NEXT I 

440 POKE 5479,43 

450 REM 

460 REM DUP MODIFICATION SUB 



470 REM 

480 FOR 1=0 TO 33 

490 READ A: POKE 1536+1, A: NEXT I 

500 FOR 1=0 TO 25 

510 POKE 1570+I,PEEKCADRC"D0S II V2.8S 

CO 1988 ATARI") +1}: NEXT I 
520 FOR 1=0 TO 32 
530 READ A: POKE 1596+1, A: NEXT I 
540 ? :? "DOS has been Modified.":? :? 

"Next type 'DOS', 'M' and '600'." 

550 ? "DUP Will then be Modified and y 

ou can":? "write the DOS files to disk 
■I 

560 ? :? "Wien done with DOS, push RES 
ET":? "to go to BASIC." 

570 POKE 10,247: POKE 11, 23: POKE 8,0 

580 POKE 6046,0: END 

5*96 REM 

600 REM === MEM LOM SET DATA === 

610 REM 

620 DATA 169,16,141,231,2,169,51 

630 REM 

640 REM === SETUP ROUTINE DATA === 

650 REM 

660 DATA 155,169,0,141,158,23 

670 DATA 32,64,21,76,247,23 

680 REM 

690 REM === PR. BOOT MESS. DATA === 

700 REM 

710 DATA 117,32,173,68,2,248,1,96 

720 DATA 76,117,32,234,234,32,70,23 

730 DATA 48,58,206,158,23,48,53 

740 DATA 141,84,3 

750 DATA 169,58,162,24,32,190,25 

760 DATA 169,88,162,24,32,190,25 

770 DATA 169,218,162,23,76,190,25 

780 REM 

790 REM === DOS INIT RESET DATA === 

800 REM 

810 DATA 169,64,141,156,23,169,21 

820 REM 

830 REM === DUP IWDIFY DATA === 

840 REM 

850 DATA 169,173,141,99,40 

860 DATA 169,23,141,104,48 

878 DATA 169,2,141,48,33 

880 DATA 169,22,141,47,33 

890 DATA 162,58,189,34,6 

900 DATA 157,16,31,202,16,247 

910 DATA 76,117,32 

920 DATA 155,205,207,196,281,198 

938 DATA 201,197,196,160,194,217 

940 DATA 160,202,225,237,229,243 

950 DATA 160,200,239,236,236,233 

968 DATA 238,231,229,242,168,167 

978 DATA 184,188,155 



CHECKSUM DATA. 

(see page 30j 

18 DATA 436,586,359,878,227,47,448,588 

,267,223,77,495,83,785,89,5332 

168 DATA 382,300,98,748,76,233,681,85, 

744,91,131,311,100,538,78,4516 

310 DATA 139,308,144,798,955,981,952,8 

83,185,387,83,296,388,262,95,6688 

468 DATA 788,181,151,388,133,204,132,3 

04,311,523,551,261,474,109,73,4343 

610 DATA 87,512,93,833,99,231,170,108, 

531,86,686,822,703,49,520,5530 

760 DATA 532,781,110,641,88,743,94,294 

,100,964,921,849,90,860,206,7273 

910 DATA 254,554,543,529,534,545,361,3 
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PANAK 
STRIKES! 

Reviews of the latest 
software 



by Steve Panak 



A lot of people ask me all the time — 
okay, one person asked me once — how 
1 go about analyzing a game. What do 
I look for? What makes a good game? 
The answer is simple and straightfor- 
ward. I think a game is good when I like 
it. Just like everyone else. 

But my tastes aren't everyone else's, 
and whether or not you like a game is 
very subjective. So I have to tell you 
why. . .why I liked it; why I hated it: 
what was right with it: and what was 
wrong with it. 

I've got to try to determine just what 
the critical points cu-e, then analyze them 
for you. 

But I can't set aside my personal likes. 
Nobody can. And it's even harder to hide 
them in a shroud of colorless prose. As 
a result, you can always tell whether I 
liked the game or not. 

Now. who ya gonna call?. . . 

GHOSTBUSTERS 

by David Crane 

ACTIVISrON 

P.O. Box 7287 

Mountain View, CA 94039 

48K Disl( $34.95 

When sequels come out, they're near- 
ly always inferior to the original. This 
seems preordained, with the possible 
exception of the Lucas and Spielberg 
films. 




This 
plies to spin-offs, too. 
probably more so, due 
to the fact that something 
is lost in the translation to 
a different medium. As a re 
suit, I tend to be more criti- 
cal in my evaluation, and this' 
bias is only intensified when I 
consider the inspiration to be 
one of the best comedies of a 
time. 

Somehow, though, I don't think that 
Ghostbusters is a truly bad game, only 
difficult and annoying. 

The annoying part is the music — it 
plays continuously. Top-40 radio and 
MT'V grated the Ghoslbiisfers theme 
through my head like an old crone's 
nails on a blackboai-d, and if I never hear 
it again, it will be too soon. But this can 
be cured — siinply turn down the sound. 
Other problems can't be solved so easily. 

leather than simply rij) off the movie 
for a quick buck (see Ghostchasers be- 
low), Ghostbusters attempts to recreate 
tlie movie, by allowing you to start your 
own Ghostbuster franchise. This is done 
through a series of game phases. 



On booting the disk, you're greeted 

by the title screen and a Ghostbusters 

sing-along. I recommend pressing the 

START key and passing right over this. 

unless you're one of the two people in 

this country who isn't familiar with 

the words to this song. 

After the sing-along, you get a 
loan to start your business. You 
purchase one of four cars, from 
Beetle to high performance. Each 
can carry different loads and trav- 
el at different speeds. Then you outfit 
the vehicle with the best in Ghostbust- 
ing equipment. Traps, ghost vacuums, 
bait, etc. may be purchased until you're 
out of mone^'. Then the game begins. 
You cruise the city streets, looking for 
Slimers. On your way to infected build- 
ings, you encounter Roamers, which you 
must freeze (by touching them) and then 
sweep up. You drive around until they've 
all been sucked up. then arrive at your 
c:hosen destination. 

Once at the building, you set a trap. 
Using your negative ionizer backpacks, 
you force tlie Slimer into the trap's beam 
for additional credit. If you fail, the vi- 
cious Slimer will wipe out one of your 
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Ghostbusters. When you're down to one 
buster, you've got to go back to IIQ for 
reinforcements. 

The problem is that it's not that easy. 
It's not hard as in difficult, but hard be- 
cause the instruction manual just doesn't 
seem to tell you what to do or what to 
expect. The joystick doesn't seem to re- 
spond, and you're left cruising around 
with that music in the background. Wait 
a second, and I'll try it again. 




Ghostbusters. 

There, I finally got the hang of it. It 
takes a good deal of time to get going, 
and once you do, it's still awfully tough. 
Just play around with it until you learn 
what it does. And what it does is, I feel, 
boring. 

Sometimes, the four Roamers join to 
form the dreaded Marshmallow Man. If 
you fail to neutralize him, he'll damage 
the city and cost you credit points. To 
rid yourself of the white monolith, you 
must jab at the B key, which drops bait 
lo attract the Roamers. Now sweep them 
up, before they can congeal into the "M- 
Man." Unlike the movie, he cannot be 
toasted. 

Finally, if you've acquired enough 
credit [at least more than you started 
with), you may attempt to sneak two 
busters into the Temple of Zuul. If this 
is completed successfully, the game ends 
— and you win if you've made money. 
More money means that you can save 
that game amount and start again (now 
or later] purchasing more/better equip- 
ment. The game grows harder as the 
ghosts move faster and faster. 

The graphics are very good and high- 
ly detailed, the cars in particular being 
vivid. One problem was a crash which 
forced me to reboot the disk. This oc- 
curred at the end of the game, on an in- 
frequent, irregular basis. 

The manual, as I said before, didn't 
seem to help me play the game, the main 
problem being that I didn't know what 
to expect. However, it was otherwise 



nicely written and put together, with a 
fan club for true Ghostbusters. 

for the rabid Ghostbuster, this game 
is a must. But for me, the movie will 
suffice. 

GHOST CHASER 
by Frank Cohen 
ARTWORX SOFTWARE 
150 North Main Street 
Fairport, NY 14450 
48K Disk $19.95 

This game isn't fooling anyone — it's 
a rip-off of Ghostbusters, the movie. I 
can deal with that, as lack of originality 
is one of the seven sins of video games. 
What I can't tolerate is poor quality. 

In Ghost Chaser, you move through 
the sixteen rooms of Fairport Manor, 
searching for keys and the elusive trea- 
sure room, scoring points by blasting the 
ghosts which materialize near you. 

Through the library, kitchen and even 
bathroom you move, each room having 
its own surprises and dangers (the se- 
cret bookcases in the library are help- 
ful, while the slippery soap in the bath- 
room is deadly, as are the many trap 
doors). While the rooms are technical- 
ly different, their similarity and drab- 
ness make them uninteresting. 




Ghost Chaser. 

Controlled by the joystick, Harry the 
Ghost Chaser runs and jumps about, 
avoiding ghosts and collecting keys and 
octoplasmic globs, the latter to lob at his 
adversaries. The joystick, while hard to 
get used to, is easy once mastered. 

A typical problem concerns the toler- 
ances around the obstacles which Har- 
ry must miss. Often, many attempts are 
necessary before a particular trap door 
can be successfully jumped. 

Also, as the picture may show, there 
is a wrap-around problem in the pro- 
gram, and ghosts which are visible at the 
bottom of the screen also infiltrate the 
top (up above the score areas). However, 



this annoying distraction is otherwise 
harmless. 

Most of the rooms are hidden and re- 
quire keys to enter. I found the game 
very simple and unchallenging; I rapid- 
ly made it through most of the rooms. 
Making a map only shortens the play- 
ability of this game. 

As to what happens after you've visit- 
ed all sixteen rooms — your guess is as 
good as mine. I lacked the interest to 
make it all the way through (I wasted a 
lot of my time on our next two games). 
but since the instructions say nothing 
about additional rooms, I guess you'll 
have to begin over — either in a more dif- 
ficult mode with more creatures or by 
simply starting again. Either way. it's 
doubtful you'll be satisfied. 

The best thing about Ghost Chaser is 
the plastic case containing the disk, as 
it will both protect the contents and look 
good on your shelf collecting dust. 

IVIR. DO 

by Tim Ferris 

DATASOFT 

19808 Nordhoff Place 

Chatsworth, CA 91311 

48K Disk $29.95 

I don't know what Mr. Do is. I don't 
know who Mr. Do is. What's more im- 
portant, I don't care — as long as some- 
one will just help me forget about this 
game. 

It's a really dumb game, little new 
here, but I played and played Mr. Do, lui- 
able to stop, even to take nourishment. 
This home version of the arcade game 
really had me sucked in. 

Upon reflection, Mr. Do appeai-s to me 
to be some sort of clown creature who's 
caught underground with scores of hide- 
ous monsters. Don't ask me -why he's 
there, but his goal is to tunnel and re- 
cover all the cherries and center treats 
(cakes, eggs, milk, cookies, and so on). 




Mr. Do. 
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His only protection is a super power- 
ball and giant falling apples. The former 
is fairly reliable — though, if you're not 
careful, the ball can become lodged in 
an out-of-the-way part of the maze, and 
you'll not get another. 

As for the apples, while they can and 
do squash the monsters most of the time, 
they also have a rather nasty quality — 
they can be turned against you. 

As you're gathering up cherries, look- 
ing forward to the next screen, sudden- 
ly one of the monsters will have mind- 
lessly pushed an apple off a ledge, and 
you're the one being beaned. But re- 
joice; you can earn additional men. 

Extra men are awarded in a unique 
way. Each time you capture a center treat 
(or at every 5000 points), BOSS mon- 
sters are released into the maze. By des- 
troying one of these, you light up the 
letter on the top of the screen, corre- 
sponding with the one on the creature's 
belly. 

You guessed it — when you get E, X, 
T. n and A. you gf3t an extra man. It's 



analogous to methods used in many pin- 
ball inachines, and you can earn free 
men as quickly or slowly as you're able. 

You'll wish to often, because Mr. Do's 
life span is very short, especially as the 
maze begins to get crowded with crea- 
tures. There are four types of monsters: 
regular. BOSS, henchmen and diggers. 
Each has its own powers. 

Diggers, for example, can tunnel after 
you. And every time you hit the center 
treat, in addition to a BOSS, henchmen 
also appear. Some of these cannot be 
hurt by the falling apples. Instead, they 
simply swallow the apples up and con- 
tinue to bear down on you. These things 
follow you until one of you is dead, and 
it's you more often than it's them. 

Turning corners trying to lose them 
might help, but not much. Your only 
chance is to get (hose cherries harvested 
and move on to the next screen. 

The graphics are excellent, no com- 
plaints. Control seems a little hard, es- 
pecially around corners, but it's accept- 
able. The program allows you to choose 



right- or left-handed control, so you can 
use either your right or left hand on the 
stick. 

There are little intermissions, like the 
PacMan series used to have. I'm not sure 
whether these are jjresent on the arcade 
version, as I rarely played it. However, 
while not overly elaborate, they were 
welcome relief from the relentless at- 
tacks in the maze. 

The manual, while a bargain base- 
ment black-and-white piece, still gives 
you all you may have wanted to know 
about Mr. Do, and a little more. 

So, while I hate to do it, I have to give 
a "thumbs up" to Mr. Do. The thing was 
addictive, and that's a major considera- 
tion. 

Until next time, I'll be testing and bat- 
tling, in rotation, a trio of chess simula- 
tions. May the best man(?) win. Don't 
worry; there will be a couple of arcade 
games, too. D 



ATARI HARDWARE / SOFTWARE 




810 Disk Drives 


$265 


(7) 


810 Disk Drive Kits 


$240 


(7) 


810 Happy Enhancement 


$185 


(4) 


1050 Happy Enhancement 


$185 


(4) 


810 Analog Upgrade Kit 


S 37 


(3) 


850 Interface Module 


$125 


(7) 


Atari 800 Computer Kits 






48K Electronics 


$100 


(7) 


Atari 400 Computer Kit 


$ 47 


(5) 


800 OS lOK ROM 'B' Board 


$ 17 


(2) 


CPU 'GTIA' Board 


$ 18 


(2) 


16K Memory Board 


$ 19 


(2) 


400/800/810/850 Power Adapter 


$ 15 


(3) 


I/O Data Cable, 6' 


$ 12 


(2) 


13 pin I/O Plug Kit (cable end) 


$ 3 


(1) 


13 pin I/O Jack (Port) 


$ 3 


(1) 


Atari Joystick (standard) 


$ 5 


(2) 


Atari Paddles (set) 


$ 8 


(2) 


All types of other boards and parts 


ire available! 


Atari Microsoft Basic II 






Cartridge w/manual 


$ 27 


(3) 


Atari Pilot, Cart, w/manual 


$22 


(3) 


Atari Basic Cartridge Kit 


$ 15 


(3) 


Atari Assembler/Editor Cart. Kit 


$ 15 


(3) 


Ordering Information: AU boards listed are complete | 


with all parts and are fully guaranteed. UPS sh 


pping 


charges are shown in brackets next to the price 


Ship- 


ping charges must be included with a 


1 orders. Orders 


may be placed by phone using your 


VISA or Master- 


Card, or you may mail your order m 


with a ch 


eck or 


money order. Hurry, some supplies 


are limited. | 


CALL OR WRITE FOR FREE 




CATALOG!!! 






CENTURIAN ENTERPRISES 




(805) 544-6616 






Post Office Box 3233 




San Luis Obispo, CA 93403-3233 




Sales Office: 890 Monterey 


Street 




Suite B, SLO, CA 93401 





COMPARE OUR PRICES 

DISKS 

FOR LESS 





5 V4 


' Soft Sector Bulk 
Packaged 


0.95 


SS/DD 


Ultramagnetics ds/dd 




SS/DD 


Spectrum ds/dd 0.99 


1.19 


SS/DD 


X'Int DS/DD 1.29 


c 


Va" 


Soft Sector in BOX 
(complete) 


1.29 


SS/DD 


CompPro DS/DD 1.39 


1.49 


SS/DD 


X'Int DS/DD 1.59 


1.69 


SS/DD 


Fuji DS/DD 2.09 


1.79 


SS/DD 


Memorex ds/dd 2.19 


2.29 


SS/DD 


Datalife ds/dd 2.59 
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3'/2" Microfloppies in BOX 

2.99 SS/DD Datalife ds/dd 3.39 

3.39 SS/DD Fuji DS/DD 4.49 

Disk Doubler 

Cuts square write protect notcti lor using botti sides 
Ola disk! 8.95 

Ribbon Special 

Epson 80/70 3.49 

Diablo HYTypell (Pomerlype) Film 3.99 



Every disk we sell carries a LIFETIME WARRANTY. 
Prices are per disk/item lor min. 2 boxes disks or 50 
disks in bulk. Add S3. 00 S&H per 100 or fewer disks. 
S&H according to weight on other Items {$1.50 min.) 
Prices and availability subject to change and relied 
5°/o cash discount. Personal checks must clear 
before shipment. 



Lone Star Computer Co. 
P.O. Box 882 
Killeen, TX 76540 — 
(817)690-1198 
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DS/DD 
^ 99 

■ ***/ each 



SS/DD 
^ 90 

■ ^/^/ each 



LIFETIME GUARANTEE 

Individually Tested, 100°c, Error Free 

Rt.-iiidjrced Hub Rings. Write Prolect 7abs. 

Color ID Labels and Tyvec Envelopes Included 

Add $3.00 shipping per 1 00 or fewer disketles 
WA Residents add 8% sales lax 



PHONF ORDt-RS 

COD Mii-^Ki' 



ifd & Visn Acccplt?( 



MAIL ORDERS 

Ci'(iiiif,'ClCh(;cksS Money Ord.-'.roceivi irmnetJi.ite 
(iiDcessinc) P(?r50nal checks ,iliow 3 w*--- 'o dOiit 

GT ENTERPRISES 
2400-SW 325th Street, Federal Way, WA 98023 

To Order, Phone Our 24 Hour Toll Free Line 
1 (800) 628-2828, Ask For Fxt. 525 

Specific Questions and Inquiries 
{206)838-5107 

Ctjmpuier Slores ask about our wholesale and pnvale labeling service 



CIRCLE /^121 ON READER SERVICE CARD 



ANALOG COMPUTING 



SEPTEMBER 1985 / PAGE 53 




Boot Camp 

continued from page 37 



A keyboard test. 

Listing 1 shows a simple program which uses CIO 
to get characters from the computer keyboard. If the 
key is one of the numbers through 9, the program 
selects the corresponding color and changes color of 
the screen to that value. Any other key will have no 
effect. If any errors are encountered during the pro- 
gram's execution, it will change the screen's border 
color to red. The program must be stopped with SYS- 
TEM RESET or the BREAK key, if you're using the 
Atari Assembler Editor cartridge or ANALOG Com- 
puting's H-.BUG. 

Let's walk through the program in Listing 1 and 
see what it does. 

Lines 140-200 define equates for the CIO com- 
mands. Instead of performing an LDA #$07, you can 
specify LDA #GETCHR. You'll probably agree that 
this makes your assembly language source code much 
easier to follow, since the GETCHR label instantly 
tips you off that the operation is getting ready for 
a GET CHARACTER CIO call. Remember that, when 
you use these equates for CIO commands, you must 
place the # symbol in front of the equate label, in- 
dicating that it's an immediate instruction. LDA # 
GETCHR loads the accumulator with the value $07; 
LDA GETCHR loads the accumulator with whatever 
is stored in memory location $0007. 

Lines 240-250 set up equates for the screen color 
registers 2 and 4. COLOR2 is the register which con- 
trols the character color in graphics mode 0, and 
COLOR4 controls the screen's border color. 

Lines 290-360 set up equates for the CIO lOCB 
fields. Again, using descriptive labels like ICCMD 
(COMMAND] make your program easier to follow 
when reading the source code. Remember that there 
are actually eight lOCBs, and these equates merely 
point to the first lOCB. We will use the X register 
to "index" into the lOCB we want to use. 

Line 370 sets up the CIO subroutine equate, CIOV. 
After setting up all the appropriate CIO information 
in the lOCB, perform a JSR CIOV to execute the I/O 
operation. 

Line 410 sets the starting address for our keyboard 
input test program. The program will load at $3000 
(you can change this value to any address in free 
RAM that you hke — I arbitrarily picked $3000). 

Line 420 sets the X register to $10, indicating that 
we will be using lOCB number one. This is a "safe" 
lOCB to use, since the only lOCB opened by the sys- 
tem is lOCB number zero. More on this later. 

Lines 430-440 set the coimnand byte in lOCB nmn- 
ber one to the value for the OPEN command, $03. 



The X register is used to index 16 ($10) bytes past 
lOCB number zero, which is lOCB number one. 

Lines 450-480 point the ICBAL and ICBAH to the 
filename we want to open. In this case, we're open- 
ing the keyboard, which is specified by the string 
K: in Line 930. Note that the string is terminated with 
the ATASCII EOL character, $9B. 

Lines 490-500 place the number 4 in the ICAXl 
byte of lOCB number one. This tells CIO that the key- 
board is to be opened as input. 

Lines 510-520 set the ICAX2 byte of lOCB num- 
ber one to 0. The keyboard does not use ICAX2, but 
it's a good idea to zero this byte, anyway. Other func- 
tions use this byte, and getting into the habit of set- 
ting all the lOCB parameters affecting a function to 
a known value is a good idea. 

Line 530 performs a JSR to the CIOV subroutine, 
opening the keyboard for us. 

Line 540 branches if the 6502 SIGN flag is set to 
the ERROR routine at Line 870. This happens if CIO 
encounters an error condition when it tries to open 
the keyboard. The Y register will contain the error 
number. If the open was successful, the Y register 
and the status byte of lOCB number one will con- 
tain $01 (operation successful), the SIGN flag will 
be cleared, and the program will continue operat- 
ing at Line 610. 

Line 610, labeled GETKEY, is where we'll try to 
GET a character from the keyboard. This line sets 
the X register to $10, once again indicating that we're 
going to use lOCB number one for a CIO operation. 

Lines 620-630 place the GET CHARACTER com- 
mand in lOCB nimiber one's command byte. This will 
instruct CIO that it is to GET a character from the 
keyboard. 

Now we must tell CIO how many characters we 
want to get from the keyboard. Lines 640-660 do this 
by placing Os in both the BUFFER LENGTH LOW 
(ICBLL) and BUFFER LENGTH HIGH (ICBLH) bytes. 
"A buffer length of zero?" you ask. Remember the spe- 
cial case of the GET CHARACTERS and PUT CHAR- 
ACTERS commands mentioned last issue? If you set 
the buffer length to 0, CIO will get 1 byte and place 
it in the 6502 accumulator! This is a handy option 
when you only want to GET one byte from a device. 
No buffer address is needed for this option. 

Line 670 performs a JSR to CIOV to GET the char- 
acter from the keyboard. When we JSR to CIOV, it 
will wait until a key is pressed, get the key's ATAS- 
CII code, and return it to the calling program in the 
accumulator. 

If any error occurred during the GET CHARAC- 
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TER operation, Line 680 will detect it and branch 
to tlie ERROR location, where the screen's border col- 
or will be changed to red, to let you know an error 
occurred . If the GET CHARACTER function operated 
properly, the character typed on the keyboard is in 
the accumulator, ready to be used, and execution con- 
tinues at Line 730. 

Lines 730-740 subtract 48 from the ATASCII val- 
ue of the key, which is in the accumulator. If the key 
was the zero key, whose ATASCII value is 48, the ac- 
cumulator will contain $00 after the subtraction. If 
the key was the one key, the ATASCII value of the 
number 1 (49) will be reduced to $01. The same ap- 
plies to the other keys from two through nine. After 
this operation, if a key from zero through nine has 
been pressed, the accumulator will contain a value 
from $00 through $09. Other keys on the keyboard 
will have their ATASCII values adjusted in the same 
manner, but the final value in the accumulator will 
be something other than $00-$09. 

Line 750 compares the accumulator to the number 
10, to see if the key pressed was from one to nine. 

If the key value was greater than nine, Line 760 
branches to the GETKEY label to try getting another 
key from the keyboard. 

If the key pressed was in the range one through 
nine. Lines 770-820 shift the numeric value of the 
key left 4 bits (a multiply-by-16 operation), OR this 
result with $04, and place it in the COLOR2 color 
register. This sequence of instructions has the same 
effect as the BASIC instruction: 
SETCOLOR 2,N,4 

where N is the number of the key pressed, from zero 
through nine. The color registers of the Atari com- 
puters contain a color value from through 15 in the 
upper 4 bits, and a luminance value from through 
15 in the lower 4 bits. Shifting the key number [zero- 
nine) left 4 bits places the key number in the color 
bits, and ORing the byte with $04 sets the luminance 
to 4. 

Line 830 loops back to the GETKEY label to get 
another key. This process continues until you stop 
the program or an error occurs. 

Lines 870-880, labeled ERROR, are executed when 
a CIO error occurs. These lines change color regis- 
ter 4 [the Atari's screen border color) to $32 ($30 for 
red + $02 for luminance), making the border a dark 
red. 

Line 890, labeled FOREVER, is an infinite loop 
which merely JMPs to itself until you stop the pro- 
gram. When an error occurs, the screen border will 



change to red, and the program will loop here for- 
ever. 

What kind of errors? 

What kind of errors could occur with this program? 
Type it in, and let's find out. 

After typing and assembling the program into 
memory, execute it. Press each of the keys from zero 
through nine and note that the screen color changes 
each time a different key is pressed. Press the alpha- 
betic keys on the keyboai'd and note that nothing hap- 
pens. This is because Lines 730-760 reject any keys 
other than zero through nine. 

No errors yet? Good! This indicates that you've 
probably typed the program in properly. Now, if 
you're not using a debug program, press the BREAK 
key. The screen border should turn red, indicating 
an error has occurred. 

What happened? Simple — pressing the BREAK key 
during any type of input [to the screen editor or key- 
board) generates an ERROR 128, or BREAK KEY 
ABORT. This is a way for your program to detect 



PARTS/SERVICE FOR ATARI* COMPUTERS 

FLAT SERVICE RATES BELOW INCLUDE 
PARTS AND LABOR, 60-DAY WARRANTY 



800 Computer Repair 


. . S65.00 


810 Disk Drive Repair . . . 


. . .S79.50 


400 Compuler Repair . . 


S4750 


800XL Compuler Repair . . . 


567.50 


600XL Compuler Repair . . . 


.... $65.00 


850 interface Repair 


. . . $60.00 


1200XL Compuler Repair . . . 


. . $65.00 


1050 Disk Drive Repair 


. . S85.00 



INTEGRATED CIRCUITS 

GTIA Chip . .C014805 

upgrade wilh instructions . 511.50 

10K Rev. B OS Upgrade, lor 400/800 
3'Chip ROM sei wilh instructions. 512,50 

Pokey Chip C012294 $8.50 

Antic Chip . 0012296 $10,50 

PIA Chip C014795 $11,00 

Basic ROM set . S15.00 

CPU Chip 0014806 $12.50 



MODULES/CIRCUIT 

BOARDS. . -complete with iC's 
16K RAM Memory Module 

CX853 S18.50 

800 10K Rev. B OS Module .. ..$18.50 
800/400 CPU Board with GTIA . . . $22.50 

800 Mam Board $28.50 

400 Main Board $26.50 

400 Main Board w/o ICs $8.50 

800 Power Supply Board $10.50 

810 Data Separator Board. 

upgrade with inslrucliorjs $25,00 

810 Side Board w/o Sep. S 1771 $43.50 

810 Rear Power Board $25.00 

810 Analog Board . . $16,00 



Above units repaired or exchanged with rebuild- 
able exchange. Include S700 return shipping 
and insurance. 

REPLACEMENT/BACKUP 
BOARD SETS. 



. $69.50 

$122.50 

$52,50 

. S99.50 



800. OK 

800. 4aK 

400. -OK 

810 Board Set .... 

All Boards complete with lOs. etc. 
Keyboards not ircluded. 

MISC. 

810 Rear Board/Analog Board Upgrade 
Willi 10-pin jumper 

and instructions S39 50 

Editor Assembler $25.00 

BASIC Cartridge . . 

w/o Case, Manual $23.50 

810 Custom Disc Drive S149.50 

400 Computer Complete S39.50 

Replacement 810 Drive Mech. . . .$75,00 

Replacement Power Transformer . $16,50 
800XL/600XL Power Supply . - . . $35,00 
SAMS Service Manual 

for 800 or 400 $19,95 ea. 

800 Keyboard Repair $35,00 

850 Interface $135.00 

De Re Atari $12.50 



AMERICAN TV 

415-352-3787 

Mail Order and Repair 15338 Inverness St., San Leandro, CA 94579 

Retail Store 1988 Washington Avenue, San Leandro, CA 94577 

Terms: We accept money orders, personal checks or C.O,D.s VISA. MasterCard okay on orders 
over $25.00, No personal checks on O.O.D. 

Shipping: $4.00 shipping and handling on orders under $150,00, Add $2.00 for C,0,D. orders, Cali- 
fornia residents include 6'/3% sales tax. Overseas shipping extra. 

Prices subiecl to change without notice. We reserve the right to limit quantities. Sales limited to 
stock on hand 

Foreign shipping extra- 
Much more! Send SASE tor tree price list. 
Repair/upgrade services available . .Call. 'Atari is a registered trademark of Atari Corp. 
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Boot Camp cominued 



when the user presses the BREAK key during pro- 
gram operation. 

Now let's see what other errors can occur. Change 
Line 420 in the program's source to read: 

8426 LDX tt$O0 ; POINT TO lOCB ttO 

and re-assemble the program. Using your debugging 
utility, execute the code as before. The screen bor- 
der should instantly change to red , indicating an er- 
ror. Using your debugging utility, intercept the pro- 
gram and examine the Y register. It should contain 
$81, or 129 decimal. 

This is the lOCB error number, which indicates 
that you tried an operation on an lOCB that was al- 
ready open. By changing Line 420 as above, you told 
CIO to OPEN lOCB zero for the keyboard. Unfor- 
tunately, lOCB zero is used by the operating system 
for the screen editor device, E: , and we can't use it. 
All the other lOCBs, from one to seven, are usually 
available for our use. 

More fun coming up. 

Next issue's Boot Camp will concentrate on more 
interesting applications of CIO, with several useful 
programming examples. Until then, please review 
this and last month's Boot Camp articles, so that 
you'll be familiar with the CIO terminology. The best 
is yet to come! D 

Listing 1. 
BASIC listing. 



8188 
8118 
8128 
8138 
8148 
8158 
8168 
8178 
8188 
8198 
8288 
8218 
8228 
8238 
8248 
8258 
8268 
8278 
8288 
8298 
8388 
8318 
8328 
0338 
8348 
8358 
8368 
8378 
8388 
8398 
8488 
8418 
8428 



.OPT NO LIST 

; KEYBOARD INPUT TE5T PROGRAM 

OPEN = $83 
CLOSE = $8C 
GETCHR = S87 
PUTCHR = 588 
GETREC = 585 
PUTREC = 589 
STATUS = 580 

; SCREEN COLOR REGISTERS 

C0L0R2 = 5e2C6 
C0L0R4 = 50208 

;CIO EQUATES 



ICCHD 
ICSTA 
ICBAL 
ICBAH 
ICBLL 
ICBLH 
ICAXl 
ICAK2 
CIOU 



= 58342 
= 58343 
= 58344 
= 50345 
= 58348 
= 58349 
= 5834A 
= 5834B 
= 5E456 



8438 
0440 
8450 
8468 
0478 
8488 
8498 
8580 
8510 
8528 
8530 
8548 
8558 
0568 
8578 
0588 
8598 
8688 
8610 
0620 
8638 
8648 
8650 
8660 
8678 
8688 
8690 
8788 
8718 
8728 
8738 
0748 
8758 
8768 
8778 
8780 
8798 
8888 
8818 
8828 
8838 
8848 
8858 
8868 
8878 
8888 
0898 
8988 
8918 
8928 
8938 
8948 
8958 
8968 
8978 



LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
BHI 



ttOPEN ;OPEN COHHAND 
ICC»a>,X ;PUT IN lOCB til 
ttKEYBD/256 ;HI ADDR OF "K:" 
ICBAH, X ;PUT IN lOCB ttl 
ttKEYBD&255 ;L0 ADDR OF "K:" 
ICBAL, X ;PUT IN lOCB ttl 

; INPUT 

;PUT IN lOCB ttl 

;N0 AUX 



tt4 

ICAX1,X 

ItO 

ICAX2,X 

CIOV 

ERROR 



2 USED 
;PUT IN lOCB ttl 
;NOH OPEN IT! 
;IF Y<0, BAD OPEN! 



NOH THAT THE KEYBOARD IS OPEN, 
HE MILL GET CHARACTERS FROM IT 
AND CHANGE THE SCREEN COLOR 
ACCORDING TO THE CHARACTER! 



£etkey LDX tt5l0 
LDA ttGETCHR 
STA ICCKI>,X 
LDA tte 
STA ICBLL, X 
STA ICBLH, X 
JSR CIOV 
BHI ERROR 



lOCB ttl 

GET CHAR COMMAND 

STORE COMMAND 

ZERO OUT BUFFER.. . 

LENGTH CPUTS BYTE. 

IN ACCUMULATOR) 

GET A BYTE! 

IF Y<0, BAD GET! 



;NOH TURN BYTE 
;FROM 0-9 FOR 

a 

SEC 

SBC tt48 
Clfi> ttl8 
BCS GETKEY 

A 

A 

A 

A 
ORA tt504 
STA C0L0R2 

GETKEY 



ASL 
ASL 
ASL 
ASL 



JW 



INTO A NUMBER 
SCREEN COLOR! 



GET READY FOR SUB. 

SUBTRACT 48 FROM IT 

>9? 

YES, TRY AGAIN! 

SHIFT BYTE. .. 

LEFT 4 TIMES.. . 

FOR THE. .. 

COLOR, 

ADD BRIGHTNESS 

STORE IT 

AND LOOP BACK! 



; CHANGE BORDER TO RED IF ERROR 

ERROR LDA tt532 ;GET RED COLOR 

irnnc^IS *iai;°S5„i.;.£!!'»"SE BORDER! 
FOREUER JMP FOREVER 

a 

; OTHER DATA 
KEYBD .BYTE "K:",S9B 
; THAT'S ALL, FOLKS! 
.END 



Send letters to: 



;NOH, HERE'S THE PROGRAM! 



K= 53000 

LDX tt5ie 



: START AT 53000 
; POINT TO lOCB ttl 



Boot Camp 

c/o ANALOG Computing 

P.O. Box 23 
Worcester, MA 01603 
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THE CREATION 

/ OF A 
NEW BREED 





The GCP Network: More Commimications, 
More Graphics, LESS Hassle! 



ilRTTillimS 



The entry to 
worlds of adventure 
and challenge. 



Choose youf 
favorite and match 
wits with others. 



Explore and conquer 
your way to 
galactic supremacy. 




FEATURES: Joystick-driven; no conmiands to learn! Private mail, bulletin boards, program library, file 
transfers, automatic logons, User Group support, local phone call access from most cities, no network 
surcharge. SYSTEM REQUIREMENTS: 48K Atari, 1 disk drive, modem. 

For more information contact: 



GAMES 
COMPUTERS 
PLAY. INC. 

112 East Market Street, York, PA 17401/717-848-2660 
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SALE 



80 CPS PRINTER 



^>4^£ 



Smith Corona 



* Commodore 64 



• Atari 



* Apple 



• More 



11" Carriage * Friction/Tractor • Graphics 



Super Summer Sale 
Ends 9-10-85 




^llllllll SMITH 



The Fastext 80 dot matrix printer from Smith-Corona. A high speed, high flexibility printer with a low suggested 
manufacturers retail price of only $299.00. Sale $149.00. It does your graphics with ease and prints letters with speeds up 
to 80 CPS. (Dobs Commodore graphics with graphics interface.) As for UexihWUy. it has bi-directional printing friction 
and tracter feed . Plus six different pitches including condensed and enlarged type for impeccable characters in a variety 
of sizes. Also standard is a full line buffer and thrifty drop-in ribbon cassettes that yield up to a million characters Finally 
It's compatible with virtually all personal computers. Teamed up with your personal computer, it'll keep track of your 
transactions, fly through finances, help with homework, even plan the family menu. All this with the assurance of superb 
Smith-Corona quality built in, makes the Fastext-80 a lot of dot for your dollar. List $299.00. Super Summer Sale $149.00. 



SPECIFICATIONS: 

Size Weight: Height 4" Width 16.5" Depth 9" 

Weight 8.2 lbs. 
Electrical Needs: 120V 60Hz 
Internal Char. Coding: ASCIIiilSO 
Print Buffer Size: 132 Bytes (1 line) 
No. of Char, in Char. Set: 96 ASCIIP. 

International 
Graphics Capability: Standard 60, 72 Dots Per 

Inch Horizontal, 72 Dots Per Inch Verticol 
Pitch: 10, 12. 16.7, 5, 6, 8.3 
Printing Method: Impact Dot Matrix 



Char. Matrix Size: (Standard) 9H x 8V, 
(Elongate) lOH x 8V 

Printing Features: Bi-directional. Short line 
seeking 

Printing Speed: 30 CPS 

PAPER 

Type: Plain 

Forms Type: Fanfold, Cut Sheet 
Max Paper Width: 1 1" 

Feeding Method: Friction Feed Std.: Tractor 
Feed Included 



RIBBON 

Type: Cassette — Fabric inked ribbon 
Life: 1 million characters 

CHARACTER MODE 

Character Font: 9x8 Standard, 10x8 Elongated. 

No. 8 pin to be used for underline 
Character Set: 96 ASCII, 11x7 International Char. 
Pin Graph Mode: The incoming bit pattern 

corresponds to the 8 pins in the print head 
Resolution: Horizontal: 60, 72 dots/inch. Vertical: 

72 dots/inch 



PARALLEL INTERFACES 



Commodore 64 — $39.00 



Apple II, He, II + — $59.00 



Atari — $59.00 



Add $10.00 for shipping, handling and insurance. Illinois residents 
please odd 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA, APO-FPO orders. Canadian orders must be in U S dollars 
WE DO NOT EXPORT TO OTHER COUNTRIES. EXCEPT CANADA. 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
doys for delivery, 2 to 7 days for phone orders, 1 day express mail ! 
VISA — MASTER CARD — C.O.D. 

No C.O.D. to Cancdo, APO-FPO. 



We Love Our Customers 

22292 N. Pepper Rd., Barrington, Illinois 60010 

312/382-5244 to order 
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Ill 88K Lowest Price In The USA! 152k 

atarI Computer System Sale 

* Students * Word Processing • Home • Business 




$449 

LOOK AT ALL YOU GET FOR ONLY ^r ^^ ^ 

SYSTEflA PRICE 

Atari 800XL 88K Computer 

Atari 1050 1 27K Disk Drive 

Atari 1027 Letter Quality 20 CPS Printer 

Atari Writer Word Processer 

Atari BASIC Tutorial Manual 



LIST PRICE 

$179.00 

299.00 

299.00 

59.95 

16.95 



INDIVIDUAL 
SALE PRICE 

$109°° 
19900 

19900 

39,5 

12" 



All connecting cables & T.V. interface included. 
Monitors sold separetly. 



TOTALS 



$852.90 $559.90 



SAVE $100 

All 5 ONLY 
$44900 

SYSTEM 
SALE PRICE 



152K SYSTEM 



^ther Accessories List Sale 

12 " Hi Resolution Green or Amber Screen Monitor $199.00 69.95 

13" Hi Resolution Color Monitor $399.00 169.95 

* ATARI 130XE 152K Computer $249.00 159.00 



Add S9.95 for 

Connection Cables 

{Monitors Only) 

(Ltd. Qty) 
Add S10 for UPS 



15 DAY FREE TRIAL. We give you 15 days to try out this ATARI COMPUTER SYSTEM! ! If it doesn't meet your expectations, just send it back to us prepaid 
and we will refund your purchase price! ! tO DAY IMMEDIATE REPLACEMENT WARRANTY. If any of the ATARI COMPUTER SYSTEM equipment or 
programs fail due to faulty workmanship or material within 90 days of purchase we will replace it IMMEDIATELY with no service charge! ! 



Best Prices * Over 1000 Programs and 500 Accessories Available * Best Service 
* One Day Express Mail * Programming Knowledge * Technical Support 



Add $25.00 for shipping and handling!! 

Enclose Cashiers Check. Money Order or Personal Check. Allow 1 4 
days for delivery. 2 to 7 days for phone orders. 1 day express moil ! 
We accept Visa and MasterCard. We ship C.O.D. to continental 
U.S. addresses only. Add SIO more if C.O.D. 



COMPUTER DIRECT 

Wc Love Our Cu.stomc'rs 

22292 N. Pepper Rd., Barrington, III. 60010 

312/382-5050 to order 



COLOR MONITOR 
^ S ALE!! ! 



(Premium Quality) 

• Built in Speaker and 
Audio 

• Front Panel Controls 

• For Video Recorders 

• For Small Business 
Computers 

• Apple - Commodore - 
Atari - Franklin - etc. 



Add S14 50 shipping, handling and insurance. 
Illinois residents please add 6°d tax. We do 
not ship to foreign countries (including 
Canada). Alaska, Puerto Rico APO-FPO. 

Enclose Cashiers Check. Money Order or 
Personal Check. Allow 14 days for delivery, 2 
to 7 days for phone orders, 1 day express 
mail! 





13" Color Computer Monitor 



(Premium Quality) 

• Beautiful Color 
Contrast 

■ High Resolution 

• Separated Video 

• Sharp Clear Text 

• Anti-Glare Screen 

• 40 Columns x 24 Lines 

• Supports 80 Columns 

List $399°° 
SALE $169°° 

'Connecting cable 59.95 



75 Day Free Trial - 90 Day Immediate Replacement Warra nty 

17900 
109'* 



Super Summer $ 
Sizzler Sale 



14" COMMODORE 1702 COLOR MONITOR 

(add S14. 50 shipping) List$299°° 

12" XTRON SUPER HI-RESOLUTION MONITOR 

80 Columns x 24 Lines, Super Hi-Resolution 1000 lines Super Summer $ 

Green or Annber Super-Clear "Easy to Read" text with i "4. SO/lOOO c;„l„r c-U 
special anti-glare screen! "-IST ^4V ilZZier >aie 

\Tj[^iai» HI-RESOLUTION GREEN OR AMBER TEXT DISPLAY MONITOR 

80 Coliimns x 24 Lines, Hi-Resolution, crisp clear eosy 

to read text with anti-glare screen ! A MUST for word I JqO. S 1 QQ 

processing. Llol I 7 7 

12" MONITOR GREEN OR AMBER TEXT super summer % 

80 Columns X 24 Lines, easy to read up front controls I JSt ^159°^ Sizzler Sale 

* Connecting cable $9.95 



GO 



Super Summer $OA95 
Sizzler Sale Q' 



• LOWEST PRICES' 15 DAY FREE TRIAL • 90 DAY FREE REPLACEMENT WARRANTY 
» BEST SERVICE IN U.S.A. • ONE DAY EXPRESS MAIL • OVER 500 PROGRAMS • FREE CATALOGS 



69« 

eS 

] 



Add 510.00 for shipping, handling and insurance. Illinois residents 
please odd b°„ tax. Add 520.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA, APO-FPO orders. Canadian orders must be in U S dollars 
WE DO NOT EXPORT TO OTHER COUNTRIES EXCEPT CANADA. 
Enclose Cashiers Check, Money Order or Personol Checl(. Allow 14 
days for delivery, 2 to 7 days for phone orders, 1 day express mail! 
VISA - MASTER CARD - CO.D. No C.O.D. to Canada. APO-FPO 



lOi 



Wc LiOi:ic Our Customers 

22292 N. Pepper Rd., Barrington, Illinois 60010 

312/382-5244 to order 
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FANTASTIC COMPUTER PRINTER SALE!!! 



10X COMSTAR 

HIOH SPEED 

Tractor Friction Printer 
130-150 CPS 



Only 




n 



List $499 



COMSTAR 



1572" 150-170 CPS Printer $31 9~ 



• Lowest Sale Price, Premium Quality, Tractor/Friction Printer in the U.S.A. (Best Value) 

• Highspeed 130-150 Characters Per Second • 40, 46, 66, 80, 96, 132 line spacing 

• Word Processing, Letters • Business Forms • Labels, Graphics, Tables • List Programs 
Fantastic Graphics • Print Modem Data • The Most Important Accessory For Your Computer 



Premium Quality 

130150 CPS lOX COMSTAR 

High Speed Printer $199 

10" carriage, 2K buffer, prints 
8V2"xn" standard single sheet or 
continuous feed paper'. Bi-directional, 
impact, dot matrix, 130-150 CPS, 9x9 
dot matrix with double strike 
capability for 18 x 18 dot matrix (near 
letter quality), high resolution bit 
image, underlining, downloadable 
characters, true lower descenders 
with super and subscripts, prints 
standard, block graphics, and special 
characters. It gives you pr'int quality 
and features found on printers costing 
twice as much!! (Centr-onics Parallel 
Interface) (Better than Epson F"X80 
and Gemini lOx). 
List $499.00. Sale $199.00. 

Premium Quality 150-170 CPS 

151/2X COM STAR Business 

Super High Speed Printer $319.00 

Has all the featur-es of the lOX COM- 
STAR PRINTER plus 151/2" carriage 
and more powerful electronics 
components to handle large ledger 
business forms! (Better than Epson 
FX 100 & Delta 15). 
List $599. Sale $319.00. 



12" DAISY \¥HEEL 

PKINTEK $199.00 

"JUKI" Superb letter quality daisy 
wheel pr-inter, 12" extra lar-ge 
carriage, up to 12CPS bi-directional 
printing, dr'op-in cassette ribbon, (90 
day warr-anty ) Centronics parallel or 
RS232 ser-ial port built in ! ( Specify ) . 
lAniilcd Quiintitir.s. 
List $299.00. Sale$19<>.00. 



OOlympia 

Executive Letter Quality $339.00 
15" Daisy Wheel Printer 

This is the world's finest daisy wheel 
printer. Fantastic letter quality, up to 
20 CPS bi-directional, will handle 14.4" 
forms width ! Has a 256 character print 
buffer, special print enhancements, 
built in tractor-feed (Centronics 
Parallel and RS232C Interface) (90 
day warranty). 
List $649.00. Sale $339.00 



Super Summer Sale Ends 9-10-85 

■JUKI 

Printer /Typewriter 
Combination .$329.00 

".llIKl" Super'b letter' quality, daisy 
wheel p r' i n t e r' / t y p e w r- 1 1 e r- 

combination. Two machines in one — 
just a flick of the switch. 12" extr-a 
lar-ge car-rlage, typewr'iter' keyboard, 
automatic mar'gin contr'ol and r-elocate 
key, dr'op in cassette r-ibbon! (90 day 
warr'anty I centr'onics par'allel or- 
RS232 serial por-t built in (Specify). 
List $.349.00. Sale $'.J2!».00. 



OOlympia 



Printer/Typewriter Combination $439.00 

Better than IBM Selectric. Superb 
computer printer combined with the 
world's finest electronic typewriter. 
Two machines in one, just flick the 
switch for up to 20 CPS printing (300 
Words per minute) on a 15" carriage 
that handles up to 14 1/8" In. paper. 
Dr'op in cassette ribbon — express lift 
off cor-rection, Centronics parallel 
interface (90 day warranty). 
List $749.00. Sale .$439.00. 



75 Day Free Trial — 7 Year Immediate Replacement Warranty 



PARALLEL INTERFACES 



For VIC-20 and COM-64 — $39.00. Apple — $59.00. Atari — $59.00. 



Add S14.50 (or shipping, handling and insurance. Illinois residents 
please add b\ tax. Add S29.00 for CANADA, PUERTO RICO. HAWAII. 
ALASKA. APO-FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES, EXCEPT CANADA. 
Enclose Cashiers Chec)^ Money Order or Personal Check. Allow 14 
doys delivery. 2 to 7 days for phone orders. 1 day express mail I 
VISA - MASTERCARD COD. No CO.D. to Canada or APO FPO 



Wc L,ox:>e Our Customers 

22292 N. Pepper Rd., Barrington, Illinois 60010 

312/382-5244 to order 



THE END 
USER 



THIS MONTH: 

The last of 
Atari's 8-bit 
computers— 
the 130XE. 



Avlhur Leycnbergor is a human fac- 
tors psychologist and free-lance writer 
living in Neiv jersey. He has been an 
Atari enthusiast for four years. When not 
computing, he enjoys playing with ro- 
botic toys. 



by Arthur Leyenberger 

Welcome back to the End User. As 
Bob Dylan noted two decades ago, "the 
times they are a-changin'." That com- 
ment is just as appropriate today as it 
was in the mid-sixties. Consider last 
year. . . 

About a year ago, I was attending a 
press conference in New York City (at 
the Warner CommLuiications Building), 
listening to James Morgan (then Atari's 
CEO) explain how the 7800 game ma- 
chine was going to rescue Atari from 
oblivion. If you recall, it was a $150 
game machine with a $100 add-on key- 
board and a whopping 32 K memory. I 
admit I was impressed with the graph- 
ics, but I doubted that it would really 
sell. 

Now, a year later, what have we here? 
A new Atari Corp., under new manage- 
ment, with at least two new computers 
under its corporate belt. From the game 
machines to 68000-based microproces- 
sor computers with pull-down menus, 
icons, etc., etc. — all in less than a year. 
Remarkable! 

With Atari out of intensive care, there 
is good news and a lot of information 
to pass along this month. But first, a 
brief diversion, if you please. 

When I originally discussed writing 
this column with your (and my) favor- 
ite editors of ANALOG Computing, I 
secretly worried that I would run out of 
topics to discuss. Boy, was I wrong. 



There are all kinds of things to talk 
about that will help make our Atari ad- 
venture together a rewarding and educa- 
tional one. I-Iere's just a sample of what 
I hope to discuss in the months ahead: 
r.ISP programming and Artificial Intel- 
ligence, controlling the outside world 
with your Atari, designing the right pro- 
grams for the right user (human factors), 
do-it-yourself software, the Atari XE and 
ST computers, operating systems for the 
Atari machines, inexpensive software, 
robotics, the MIDI musical interface, 
non-educational educational software, 
and how to write documentation. 

My list could keep on, but I would 
soon run out of room for this month's 
topic. 

If you'd like to see other topics co- 
vered in the End User, please write to 
me (see the box at the end of this col- 
umn) and let me know what you want. 
I'll try to include your favorites. 

Now, on to this month's topic, which 
is (drum roll, lights and camera, please) 
the Atari 130XE computer. 

The Atari 130XE. 

In less than eight months from the 
time they took over, Tramiel and com- 
pany had delivered their first offspring. 
Let's take a close look at this machine, 
from the outside in. First, the box. 

The colors are red and gray, a distinct 
change from the traditional Atari silver 
and black. This is a new company, there- 
fore, a new box. Atari's new motto "Pow- 
er without the Price," is everywhere on 
the box. 
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The 130XE. 



The carton also briefly mentions new 
— yet unavailable at this time — softwai'e: 
Silent Butler (personal finance). Music 
Painter and AtariWriter Plus. On the 

back panel is a picliu'e of what looks like 
a 1050 disk drive in XE clothing. Atari 
still denies that there will be a new or 
modified disk drive for the 130XE. 

Like a box of Cracker Jacks. 

Opening the carton, we find that the 
power supply and TV video cable are 
identical to those used by the 800X1,. 
There's also the familiar TV switch box. 

The big surprise is that there, in white 
with red trim, is something that the old 
Atari felt was unnecessary: a manual. 
No, this isn't the colorful 8-page fluff 
that accompanied the old 800 (in its last 
days), 600XL, 800XL and 1200XL. This 
is a real, 132-page, well-written, useful 
document. Just like (tracker Jacks — a 
prize in every box. 

The manual is printed on glos.sy stock 
and has a spiral binding. It's divided into 
three sections. The first section, called 
"Cletling Started," shows the computer 
neophyte liow to get up and running. 
With plenty of diagrams and illustra- 
tions, this section is easy to understand. 
There are chapters covering use of the 
keyboard, graphics, hook-up and other 
I'undamental information. 

The second section consists of general 
programming information concerning 
the built-in Atari REV-C BASIC. C:hap- 
ter topics include editing with the key- 
board, writing simple fiASIC^ programs, 
giving rudimentary commands, and us- 



ing sound and graphics. Program exam- 
ples are widely used and thoroughly ex- 
plained. 

The third section of the manual con- 
tains various appendices for BASIC] re- 
served words, error messages. ATASCll 
character set and troubleshooting. There 
are also a couple of important topics. 

A chapter on accessing the full 128K 
RAM memory of the computer is wel- 
come technical information (more on 
this topic a little later). There's also a 
complete set of specifications on the 
130XE, including pinouts of all the con- 
nectors. 

The hardware. 

The 130XE itself is slightly smaller 
and lighter than the 800XL, Its most 
striking characteristic is the low profile 
look (more so than the BOOXL), with 
many angular lines adding to a high-tech 
look. 

The function keys are placed above 
the keyboard on the top right side. Joy- 
stick ports (still only two) are located on 
the right side of the machine. All other 
jacks are on the rear. 

As seen from the back, there are (from 
left to right): the Serial I/O jack, car- 
tridge port. Enhanced Cartridge Inter- 
lace (ECI), monitor jack, channel selec- 
tor, RF (TV) jack, power jack and ON/ 
OFF switch. All of the jacks have both 
a word label and a symbol. This ma- 
chine was obviously intended for over- 
seas marketing. 

Somewhat similar to an BOOXL, which 
has a parallel interface jack on the rear 



of the computer, the 130XE has the ECI. 
This 14-pin jack is used in conjunction 
with the cartridge slot to allow connec- 
tion of high speed peripherals. 

The pins provide + 5 volt power and 
access to the computer's memory and 
I/O chip select lines. Atari says that this 
arrangement of the cartridge slot and ad- 
jacent ECI provides the same or more 
functions than the parallel port, on the 
800XL. It will be interesting to see if any 
companies bring out products for this 
interface on the computer. 

The XE keyboard seems more respon- 
sive than the BOOXL. It also seems that 
the keys are larger, although it may be 
that they're sculptured more and, there- 
fore, feel better to your fingers. It didn't 
take me long to get used to, and now I 
prefer it to the BOOXL keyboard. 

The only aspect of the keyboard that 
I don't like is the location of the RESET 
key. It's next to the OPTION key, with- 
out any guard around it. Several times 
I've inadvertently pressed RESET when 
I intended only to press OPTION. 

The severe consequences (rebooting) 
have taught me to be more careful. 1 
would have preferred to have the START 
key located on the far right and RESET 
on the far left of the cluster, separated 
by the HELP key. 

The RF output (channel 2 or 3 to the 
TV) of the 130XE is far superior to the 
BOOXL, And the monitor output is as 
good as or better than even the early 800 
computers. 

(conth}i.ied on page 65] 
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The Hume Accountant hardware requiremenis: 48K Atari 800/800XL, one or two disk drives, primer ( 132 Co! optional) 
Thf Hume Accountant is a registered trademark of Arrays, Inc./Coniinental Software. Aiari is a registered traclfmark of Atari, inc. 
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THE END USER continued 



Double your pleasure. 

The 130 is a nice machine, although 
basically an 800XL with 128K of memo- 
ry. Since it uses the same (5502 micro- 
processor, it can only address 64K of 
memory at a time. Therefore, a form of 
bank switching is used to access the ex- 
tra 64K. 

The extra memtwy is divided into four 
separate groups of 16K each. With bank 
switching, the computer can be "told" to 
look at a particular 1()K memory section 
at a time. In this way, the 1,30XE can be 
fooled into using more memory. 

On the 130XE, the second bank of 
memory is located from memory location 
16384 to 32767 (hexidecimal, $4000 to 
$7FFF). By changing the value of the 
bank switch, located at memory location 
54017 ($D301), you can select which of 
five 16K banks the computer will address 
(the original 16K bank or one of the four 
"extra" banks). 

The location of the memory switch is 
the port B address of the 6520 peripher- 
al interface adapter chip, which controls 
the computer's input and output. In ad- 
dition to controlling which memory the 
B502 looks at. the jsort B address cmi also 
control where the ANTIC] video chip 
looks for memory The 130XE manual ex- 
plains how to address this memory for 
the 6502 processor or the ANTIC chip. 
What good is this extra memory if you 
have to specifically insb'uct the computer 
to USB a certain bank? The answer lies 
in the use of new software or more 
powerful versions of existing commercial 
software. 

Already, Atari has announced that 
AtariWriter Plus will take advantage of 
the extra memory in the 130XE to allow 
you larger text files in memory. Anoth- 
er word processor Paper Clip, from Bat- 
teries Included, is said to have a version 
that will use the XE's extra memory. 
Synapse's SynFiIe+ database program 
will have a modified version to use the 
extra memory. And there should also be 
new software that's designed specifically 
for the 130XE. 

DOS 2.5. 
Another major use of the extra mem- 
ory of the 130XE is for DOS 2.5. This is 
the new Disk Operating System for Ataii 
computers that has been developed by 
O.S.S. It's main advantage for the 130XE 
is that it allows you to configure the ex- 
Ira memory as a l^MDISK. 

As you probably know, a KAMDISIx 
is software that uses a part of the com- 



puter's memory to simulate a very fast 
disk drive. Since there are no moving 
parts inside the computer's memory, just 
about instant access is available to read 
or save files. 

The RAMDISK software used with 
DOS 2.5 loads automatically when you 
turn on the computer with the DOS disk 
in the drive. The extra 64K of RAM 
translates into the equivalent of 499 sec- 
tors, and the RAMDISK is defined as 
drive 8 (D8:]. 

Also, DUP.SYS and MEM.SAV are co- 
pied to the RAMDISK, so when you 
type DOS from BASIC, DOS loads in 
about 2 seconds (from the RAMDISK), 
rather than in about 15 seconds as from 
a normal disk. 

In use, DOS 2.5 is very simiku- to DOS 
2.0. The major difference is in the For- 
mat command. If the menu item I (for- 
mat disk) is selected with an Atari 1050 
disk drive connected to the computer, 
the disk will be formatted in dual den- 
sity (140K) format. Menu item P will al- 



C.E.5. 



HflRDtWRE NET PRICE 
H/4P-PY 1050..<»PECI/<L).»145.00 
H/flPPY 810. ...(SPEC1>IL)..» 145.00 
H.OPPY 1050 l*'/DRIKE ...»345!!! 

OLD 800 R/4MROD »75.00 

ATARI 130XE »145!!! 

ATARI 520ST »C>»LL 

OMNIMON<800/400) »49.95 

OMNIKUE XL »45.00 

OMNIk'UE(800/400) »2S.95 

R-KERTER (M/F) $.39.85 

RAMROD XL(XE COMP.)..»72.00 

SOFTWftRE 

LJK LETTER PERFECT. ...»39. 50 

LJK DATA PERFECT JJ35.50 

HOMEP/4K »35.00 

P/HPERCLIP »46.50 

EDUCATION 

US GOV. FACT& »1€..50 

US HISTORY F>9CTS 9^18.50 

k'ORLD HISTORY F>1CTS»16.S0 

tfORLO GEOG. FACT& ^18.50 

BIOLOGY F/«CTS »16.50 

(>1LL ABOVE SUBJECTS^;4RE 
8TH GR/4DE OR HIGHER) 



OUT OF STATE. ORDERS ONLY: 

(8e8> 223-268fi 

QUESTIONS OR C>ILIF ORDERS: 



<714)€35-8621 

■^CONSUMER ELECTRONIC 
STORE 

1100 W. LINCOLN At^E. >JN>JHEIM 
CA 92805 OPEN: H-F 10-7 SXT 
10:30-4(PST) KIS<4 8iM/C ADD 
A/- GOOD LUCK IN SCHOOLiHijl!! 



low you to format a single-density disk, 
even if one 1050 is attached. If no 1050 
drives are connected to your system, op- 
tion I will format disks in single-density 
format. 

No question about it: the 130XE is a 
powerful machine. At under $200 (I paid 
$140 locally for mine), it's quite competi- 
tive with computers from both the "nau- 
tical" and "fruit" companies. Only you 
can decide if it's worth trading up to 
what is destined to bo the last 8-bit com- 
puter from Atari. The end of an era, 1 
guess, n 



The End User 

c/o ANALOG Computing 

P.O. Box 23 
Worcester, MA 01603 
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THE ELITE PERSONAL 
ACCOUNTANT 

"The Elite Personal Accountant" is a complete and 
easy-to-use personal financial manager. It is designed 
exclusively for the Man home computer, and there is 
nothing else like it! Four separate programs interact 
with your data, including defining your financial 
information, adding and changing records, reports and 
utilities. Here are just some of the features: 

• "True" menu-driven design provides help with 
each function. 

• Each (unction provides examples and/or help 

• 79 categories you define, in five areas 

• Eight fields per record 

• Add/Edit screen keeps you updated, with posted 
and actual bank balance, cash balance, "top 5" 
credit cards, and more — plus a built-in five- 
function calculator! 

• 17 flexible method codes allow for received as well 
as outstanding checks and deposits, checking and 
cash withdrawals, and more — you can even trans- 
fer between accounts! 

• Edit mode options include Back, Next, Jump (to a 
record), Undo (delete), and Look (search) on any 
field. 

• Figures are automatically reversed, if a record is 
changed or deleted. 

• Up to 1300 records on any standard disk (single 
density). 

• Reports include transaction total, checkbook 
reconcile, category totals, net worth and more. 

• Detailed Report allows you to list certain records, 
under multiple conditions, 

• All reports may be viewed on screen. 

• Complete instructions. 

• Personal, free support. 

• More, more, more! 

Price $48.95. disk only. Requires 48K, basic, and one 
disk drive (will support three). Orders shipped fast and 
prepaid. Washington State residents add S3.86 (7.9%) 
sales tax. Check or money order to ELITE SOFTWARE, 
14897 INTERURBAN AVE. S. #60. SEATTLE. WA 98168. 
Questions or support, call (206) 246-5122. 
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CARDCO 

32K BUFFER, .(C-64).. . 


59 


JUKI 

Juki 6100 


...375 


LEGEND 

880 


199 


Jm«C. ^....TTT 


V'!!IIVw)' 






Ww-Moffw. 


AXIOM 








RS232 Serial Board ... 


65 


1080 


225 




GP550AT Alan) 

GP550CD C-64 


239 

239 


CITIZEN 




6100 Tractor 


119 


1380 

1385 


265 

299 


PANASONIC 

1091 239 


6100 Sheet Feeder 

Juki 6300 


...209 
.. .765 


GP550PC IBM) 


229 


MSP-10 


..289 






1090 185 


GP550AP Apple)... 
GP700AT Afari) 


269 

439 


MSP-15 

MSP-20 


. 449 
.449 






DIGITAL DEVICES 


1092 375 

1093 429 


GP700AP Apple).... 
ELITE5CD (CTM) 


439 


MSP-25 


...569 


OKIDATA 




16K BUFFER 


....75 




229 


Sheetldr (10/20) 


...189 






32K BUFFER 


...89 




GP100AT (Atari) 


CALL 


Sheetfdr (15/25) 


199 


Okimate 20 


CALL 
CALL 


64K BUFFER 


...125 




C. ITOH 

PROWRITER 8510AP 279 


CORONA 




182 


. 215 


TOSHIBA 




SILVER REED 


192 

193 


..349 
565 


8510AP+ 


.299 


LP300 Laser Printer .. 


2699 


92P 


349 


P1340 


..559 


EXP500 295 


8510BPI 


309 


200361 Toner Cartridge 


...89 


93P 


...565 


P351 


.1289 


EXP550 409 


8510SP 


375 






84P 


...645 






EXP770 749 


8510SR 

8510SCP 

8510SGR 

7500AP 


425 
449 
469 

205 


EPSON 

LXeO(NEW) 


...225 


92 Imagewriter 349 

'IBM versions also 


MICROBITS 

Microstuffer 


99 


STAR MICRONICS 


7500AR 


245 


FX80+ 


...349 






DIABLO 




SC-10 215 


1550P 


439 


FX100+ 


.479 


BROTHER 






SG-15 375 


1550AP+ 


459 


JX80 Color 


489 




025 


549 


SD-10 339 


1550BCP 


469 


RXlOO 


...369 


HR-15XL-P 


359 


630API 


,1599 


SD-15 445 


A10-30P 


445 


HOMEWRITER 10 (New). 


CALL 


HR-15XL-S 


.359 


630ECS 


.1759 


SR-10 485 


F10-40P or S 

F10-55P or S 


859 
1039 


CR220 (C-64) 

LQ1500 Par .' 


.159 
...999 


HR-35P 

HR-35S 


...839 
,. .839 


D801F 

P32CQ1 


.2395 
699 


SR-15 585 




F10 Tractor 


159 


LQ1500 Ser 


1059 


2024L-P 


.. .949 


P38 


1749 


SB-10 CALL 


F10 Sheet FeetJer 


. 249 


HI80 Color Plotter 


.379 


M1009-P 


189 


C150 


999 


SG-10C-64 (NEW) CALL 





MONITORS 



SAKATA 

SGIOOO 12" Green .99 

SA1000 12" Amber 109 

SG1500 12 Green TTL...II9 
SA1500 12' Amber TTL...129 
SCIOO 13' Color Comp...209 

SC200 13" RGB 389 

STSI Till Stand 29 



ZENITH 

ZVM 122A Amber 84 

ZVM 123G Green 75 

ZVM 124 Amber IBI^ 129 

ZVM 131 Color 275 

ZVM 133 RGB 389 

ZVM 135 Composite 449 

ZVM 136 Hi Res Color 589 

PANASONIC 

DT 1300 RG1 combosite 299 



NEC 

JB-1260 Green 95 

JB-1201 Green 135 

JC 1215 Color 235 

JC 1216 RGB 375 

JC1460 Color 265 

JB-1205 Amber 139 

PRINCETON GRAPHICS 

MAX-12 Amber 189 

HX-12 RGB 475 

SR-12 RGB 599 



AMDEK 

300 Green 125 

300 Amber 139 

310 Amber IBM 155 

Color 300 Audio 245 

Color 500 Composite 369 

Color 600 429 

Coior 700 495 

Color 710 569 

X-TRON 

Comcolor I Compo.slle Green, 185 



TAXAN 

115 12' Green Composite.. ..CALL 

116 12' Amber Composite. ..CALL 

121 12' Green TIL 135 

122 12' Amber TIL ...145 

220 14' Color Composite 259 

410 12' RGB Hi Res IBM 329 

420 12" RGB Super Hi IBM... 409 
440 12' RGB Ultra Hi Res .569 
Till Stand 35 



MODEMS 




DRIVES 




PRINTER INTERFACE 


DISKETTES 


HAYES 

SMARTMODEM 300 139 

SMARTMODEM 1200 379 

SMARTMODEM 1200B....349 

SMARTMODEM 2400 599 

MICROMODEM HE 135 

ANCHOR 

Volksmodem 55 

Volksmodem 12 186 

Mark 12 229 

MICROBITS 

MPP100E (ATARI) 75 








AXIOM 

AT846 (Atari) 65 

ATARI 

850 Interface 109 

DIGITAL DEVICES 

AoePace XLP (Atari) 49 

U-PrinI A (Atari) 54 

U-CALL RS232 (Afari) 37 

CARDCO 

C/7AT (Atari) 49 


SKC (Box 10) 

(Qty ) 10 100 500 

5-^ SSDD .13 75... .1299. ...11 99 

5'.' DSDD 15 75. ...14 99. ...14 25 

ELEPHANT (Box 10) 

5'-.' SSSD 13 50. ...12 99.. ..11 99 

5'.' SSDD 14 99... 13 99.. ..12 99 

5'4 DSDD 16 99.... 15 99.... 14 99 

Premium SSDD.... 15 95.... 14 95 ....13 95 
Premium DSDD.... 17 95 ... 16 95, ...15 95 

MAXELL (Box 10) 

5'4 ■ MD-1 16 75 15 75 14 75 




INDUS 
Atari 

215 










SU- MD-2 22 99... 21 99... 20 99 



ATARI 

BOOXL CALL 

130XE (NEW) CALL 

520ST (NEW) CALL 

1050 Drive 165 

1010 Recorder 42 

1020 Printer 55 

1025 Printer 159 

1027 Printer 179 

850 Interface 109 



ATARI SOFTWARE (NEW) 

Codewriter 35.75 

Filewriter 20.75 

Reportwriter 20.75 

Menuwriter 20.75 

Home Integrator 19.75 

Small Bus. Inventory 11.75 

Salesman Expenses 11.75 

Aces Rec/Pay 1 1.75 

Retail Invoice 1 1.75 

Final Legacy 15.75 

Adventure Writer 18.75 

Star Voyager 11.75 



MICROPROSE (Atari) 

Kennedy Approach 21.75 

Crusade in Europe 24.75 

Decision in Desert 24.75 

Solo Flight 20.75 

Nato Commander 20.75 

Spitfire Ace 18.75 

F-15 Strike Eagle 20.75 

Hellcat Ace 18.75 

SUB LOGIC (AtariJ 

Flight Simulator II.... 32.75 

Nigrit Mission Pinball 20.75 



BRODERBUND (Atari) 

The Print Shop 28.95 

Graphics Library 18.95 

Graphics Library II 19.50 

Bank St. Writer 42.75 

Whistler's Brother 18.95 

Spelunker 18.95 

Sfealth 18.95 

Serpent's Star 24.95 

Mask of the Sun 24.95 



TOLL FREE 1-800-233-8760 






TO ORDER 



CALL TOLL FREE 

800-233-8760 



or send order to 
Lyco Computer 
P O Box 5088 
Customer Service 1-717-327-1825 Jersey Shore PA 1 7 740 



RISK FREE POLICY 

In-stock items shipped within 24 hours of order. No deposit on COD. orders. Free 
shipping on prepaid cash orders within the continental U.S. Volume discounts 
available. PA residents add sales tax. APO. FPO. and international orders add 
$5.00 plus 3% for priority mail service. Advertised prices show 4% discount lor 
cash, add 4% for MasterCard or Visa. Personal checks require 4 weeks' clearance 
before shipping. Ask about UPS Blue and Red label shipping. All merchandise 
carried under manufacturer's warranty. Free catalog with order. All items subject 
ID change without notice. 
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by Mario Perdue 



I hope you were all able to get through last month's 
article, and that you now have a functional keyboard. 
This month we're going to put together some soft- 
ware to run it. If you can't wait to hear it play, skip 
through this text imtil you get to Listing 1. Type it 
in and follow the instructions to run it. If, on the oth- 
er hand, you want to know what the program's do- 
ing, read on! 

The minimum software configuration. 

Before we get involved in any actual programming 
code, let's look at some block diagrams of what it is 
we want to do. Figure 1 is a diagram of the "bare 
minimum" software configuration. The minimum set- 
up requires three modules: the keyboard scan rou- 
tine (SCAN); a table of notes to be played (PTABLE); 
and the note output routine (NOUT). 



It works like this. SCAN reads the keyboard via 
the keyboard register, verifies the data, checks for a 
key-down flag and builds the PTABLE. Then NOUT 
takes the data from the PTABLE and puts it into the 
sound registers. Simple, right? Yes, but like the "brute 
force" encoder from last month, it's too simple. 
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Figure 1. 
Minimum software block diagram. 
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Figure 2. 
A better mousetrap. 

Figure 2 shows a more complex, but more versa- 
tile arrangement. In this program, SCAN still looks 
at the keyboard, but now it builds INKEY. Then DID- 
DLE comes along. 

DIDDLE does several things. First, it compares IN- 
KEY to PTABLE and uses this data to update the 
STATE table. The STATE table tells the program what 
the state of each note is (i.e., ATTACK, DECAY, SUS- 
TAIN or RELEASE). Then, DIDDLE builds the new 
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PTABLE from the combined data of INKEY and the 
old PTABLE. 

When the new PTABLE is built, priority is given 
to keys which are still depressed. This insures that 
a newly depressed key will sound immediately, even 
if all the channels are currently busy with notes in 
the release state. 

The last function of DIDDLE is to update the pa- 
rameter table (PARAMS) , which contains the volume 
and distortion values for each note. Finally, NOUT 
gets data from both PTABLE and PARAMS, and uses 
this data to play the notes. 

The program. 

Listing 1 is a BASIC program which will build a 
file called MUSIC.COM. This is a binary load file 
with a starting address of 4000 hex. The way you 
load and run this program depends on what DOS 
you're running. 

If you're using DOSXL by O. S. S. , just type MUSIC 
at the system prompt. If you're using DOS 2 or a simi- 
lar menu-driven DOS, simply type L, and then type 
MUSIC.COM when you're asked for the name of a 
file to load. If you'd rather not do any typing to load 
the program, you can rename the file MUSIC.COM 
to AUTORUN.SYS, and it will load when the disk 
is booted. 

When you run MUSIC.COM, the screen will sim- 
ply display a prompt. No bells. No whistles. No awe- 
some graphics displays. Don't get angry; this is, after 
all, an article about making music. If you want some- 
thing with graphics, try a game program. 

If you don't get the prompt, make sure the keyboard 
is connected to the computer. The keyboard must be 
connected be/ore the program is run, or the computer 
will hang. 




Using the keyboard. 

Before hitting any keys, set the four knobs: AT- 
TACK, DECAY and RELEASE to fully counterclock- 
wise; SUSTAIN to fully clockwise. These settings 
will cause an envelope similar to the one labeled 
WAVE A in Figure 3. 

Now, press and release a key on the keyboard. 
What you should hear is a tone that starts at full vol- 
ume as soon as the key is depressed, holds that vol- 
ume for as long as the key is depressed, and drops 
to no volume as soon as the key is released. If this 
isn't what you hear, check to make sure you wired 
everything correctly. 
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Wave A. 
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Wave B. 
Figure 3. 

Next, set the RELEASE knob to its mid-point set- 
ting and hit a few more keys. The new envelope will 
sound the same as the last one until you release the 
key. The program sees that the key is no longer down 
and changes its STATE to— you guessed it— the RE- 
LEASE STATE. 

In this state, the value from the pot is compared 
to the number of jiffies (sixtieths of a second) that 
have passed. When they're equal, it steps the vol- 
ume down one notch. What you hear is the note sort 
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of fading out (similar to a piano's note) , rather than 
just stopping. Graphically, it looks like WAVE B of 
Figure 3. 

Two of the other knobs [ATTACK and DELAY) also 
control time constants. So the note doesn't have to 
just "come on," either. ATTACK works like RELEASE 
does, only in reverse. DECAY starts after ATTACK 
reaches its peak, but it stops dropping when it gets 
to the SUSTAIN level. SUSTAIN is the only knob that 
doesn't control time. It sets the level (volume) that 
is output while the note is still depressed but not cur- 
rently in one of the other states. 
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Figure 4. 



As you can probably guess, the possible settings 
of these controls— and, therefore, the different enve- 
lopes—are unlimited, theoretically. In practice, the 
waveforms of Figure 3 can't really be achieved. 

They look more hke the waveform in Figure 4. Each 
step is caused by a change in the volrune setting, and 
you don't have to listen very closely to hear them. 
Still, some very pleasing effects can be achieved de- 
spite this limitation 

The assembly listing. 

That brings us to Listing 2. This is the source code 
for Listing 1. You do not have to type this program 
in, unless you plan to make changes to the code. The 
program was written with the MAC/65 cartridge from 
O.S.S., but should only require minor modification 
to be used with another assembler. 

Listing 2 follows the second block diagram pretty 
closely. There are changes in terminology. SCAN has 
become KBDSCN, and DIDDLE is comprised of AL- 
CHAN, TRANS, ADSR and CLOCK. 

INIT is a routine not shown in the block diagram. 
It r\ms one time to clear some memory locations and 
set up the VBI vector. If you're interested in more 
detail, the comments should help get you through it. 

Feel free to make changes to this program. It's really 



not intended to be the "ultimate" music program. In 
fact, it is really nothing more than a starting point, 
something you can build on. 

One area that should be worked on is program pro- 
tection. This prograixi does nothing to protect itself. 
If you hit the RESET button, the program is gone. 
If you do any SIO transfers, the program is gone. You 
can't run BASIC while this program is running, ei- 
ther. There's plenty of room for improvement. 

You should now have enough to get you started 
making computer music in "real time," but not much 
more than that. D 

Mario Perdue has been a Field Engineer in the com- 
puter world for about ten years. He got an Atari 800 
three years ago, using it mostly for games. The 800 
has been replaced with an 800XL on which his work 
centers around music, although he doesn't pJay any 
instruments. 

Listing 1. 
BASIC listing. 

100 REM mCKKMKKKItltmcmCKKMlCICKMMMKKKKKM 

lie REH * NU5IC.BAS * 

120 REH * BY MARIO PERDUE * 

130 REH * * 

140 REH * COPYRIGHT NOVEHBER 1984 * 

ISO REH « * 

160 REH * THIS PROGRAH HAKES A FILE * 

170 REH * NAHED "D : HUSIC . COH" HHICH * 

180 REH * IS USED HITH A SCANNING 3 * 

190 REH * OCTAVE HUSIC KEYBOARD. « 

200 REH * THE FILE IS THEN RUN AS A « 

210 REH » BINARY LOAD FILE. THE « 

220 REH * KEYBOARD HUST BE PROPERLY * 

230 REH « CONNECTED BEFORE RUNNING * 

240 REH * OR THE PROGRAH HILL LOCK. « 

250 REH MmiKKMKMlCMMMmCMKlCMKKMMKKlCMmCK 

260 REH 

270 TRAP 270:? "HAKE CASSETTE CO), OR 

DISK C1)";:INPUT DSK:IF DSK>1 THEN 270 

280 TRAP 4O0e0:DATA 0,1,2,3,4,5,6,7,8, 

9,0,0,0,0,0.0,0,10,11,12,13,14,15 

290 DIH DATSC91),HEK(22) :FOR X=0 TO 22 

:READ N:HEX(X)=N:NEXT X:LINE=99e;REST0 

RE 1000: TRAP 370:? "CHECKING DATA" 

300 LINE=LINE+10:? "LINE:";LINE :READ D 

ATS: IF LENCDAT$)<>90 THEN 470 

310 DATLIN=PEEK C183) +PEEK C184)«256 : IF 

DATLINOLINE THEN ? "LINE ";LINE;" HIS 

SING!": END 

320 FOR X=l TO 89 STEP 2:Dl=ASCfDAT$ tX 

, XI ) -48 : D2=ASC CDATS CX+1 , X+1 J ) -48 : BYTE= 

HEX CDl)«ie+HEX (D2) 

330 IF PASS=2 THEN PUT ttl, BYTE: NEXT X: 

READ CHKSUH:GOTO 300 

340 TOTAL=TOTAL+BYTE:IF T0TAL>999 THEN 

TOTAL=TOTAL-18O0 
350 NEXT X:READ CHKSUH:IF TOTAL=:CHKSUM 

THEN 300 
360 GOTO 470 

370 IF PEEKC195)<>e THEN 478 
380 IF PASS=0 THEN 420 
390 IF NOT DSK THEN 410 
400 PUT ttl, 224: PUT ttl, 2: PUT ttl, 225: PUT 

ttl,2:PUT ttl,0:PUT ttl,32:CL0SE ttl:END 
410 FOR X=l TO 60: PUT ttl, 0: NEXT X:CLOS 
E ttl: END 
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420 IF NOT DSK THEN 450 
430 ? "INSERT 0I5K MITH DOS, PRESS RET 
^-pVttsiC.COM--"'"""^ IMlrOPEN 111.8.0 
440 'put tti,255:PUT ttl.2S5:PUT 111. 0: PUT 

ttl,32:PUT ttl.27:PUT ttl,34:G0T0 460 
450 ? "READY CASSETTE AND PRESS RETURN 
••;:OPEN ttl.8.128,"C:" .-RESTORE 480: FOR 
X=l TO 40: READ N:PUT ttl.N:NEXT K 
460 ? ;? "HRITING FILE":PASS=2:LINE=99 
0: RESTORE 1000: TRAP 370: GOTO 300 
470 ? "BAD DATA: LINE "; LINE: END 
*5S.*SI5 0,5.216,31.255,31,234.234.234 
,234,234,169,60,141,2,211,169,0.141.23 
iA2'i3''^*4l"'56,141,232,2 
490 DATA 133,15,169,0,133,10,169,32,13 
3f J. J. p 24 J 96 

1000 DATA A9388D02D3A9808D00D32065E4A2 
20A039A9e7205CE4A9e08D08D2A2e7959895A0 
CA10F9A9A0A2079590CA10FB,562 
1010 DATA A9FFA20F9580CAieFB4C3e20A203 
S2SSSS§SRS'^^®®®^^^'''>'^^008D00D3AD00D3CD 
00D3D0F8C938F0102A10F16A , 153 
1020 DATA 958eGD00D3F0FBCA10E63007A9FF 
9580CA10FBA203B588C9FFF043A003D98000DO 
17A9FF998000B598C903D031 , 493 
1030 DATA A90095A09598A9A19590D0258810 
ElB598C9e3F008A9e39598A90095A0B590C9Al 
10eEA9FF9S88A9A09590A900 , 470 
1040 DATA 959895A0CA10B4A203B580C9FFF0 
21Aee3B98800C9FFF0058810F63013B5809988 
00A9A1999000A90099A000A9 , 207 
1050 DATA FF9580CA10D6A203B580C9FFF021 
A003B99800C903F0058810F63013B580998800 
A9A19990e0A90099A000A9FF , 919 
1060 DATA 958eCAieD6A203B588G9FFF05DB5 
22522^''*20C902F0331036B5A0C5B5304BA900 
95A0B590e901C9A8303DA901 , 669 
1070 DATA 9598A9A8D035B5A0C5B63031A9e0 
2?S25S2S22'E^<»^'=5B71022A9029598A5B74C76 
21B5A0C5B83015A90095AeBS , 405 

iSSS*??!** '038E901C9A01006A9009598A9AO 
9590CA109AA203A006B588C9FFD00CA9009901 
D29980D29598F01338E94F86 , 968 
iiltfA'^^'^ B0AABDCF219900D2A6B0BS909901 
S?S0fS5fif555i2'^'*7*»«24A4A4A4A95B5CAlO 
F4A5B729eF09A0C9A83002A9 , 558 
ii22„S5IS ft8«5B7A203F6A0CA10FB4C62E4F3 
E6D9CCC1B6ADA29990888079726C66605B5551 
4C4844403C3935322F2D2A28 . 121 
kiiiftA*^'^^ 2523211FlD000000800e0000e000 
00000000000000000000000000000000000000 
000000000000000000000000,286 



CHECKSUM DATA. 

(see page 30) 

i"! o5*I5«''*' ^^*' '57' 247. 889. 253. 97, 94 
6 ,980 , 866 , 935 , 625 , 361 , 127 , 193 , OsIb 
?^2^S''I5o71Si'i45*®'"^'750,455,970,65 
2,940.920.424.732,643,52.215.8581 
♦•"•^TA 205,733.208,678.761.522,305,1 
74 ,717 ,188 ,800 , 891 , 978 ,774 , 712,8646 
1050 DATA 742,816,796,690,16,9^2,431,4 
643 
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Assembly listing. 


1 MU8II 


^SYNTHESIZER 




1 

1 THIS 


PROSRAH IS A 


POLYPHONIC 


1 ALQORITHH 


TO BE USED IN CONJUNCTION 


1 HITH 


A SCANNING 3 


OCTAVE KEYBOARD. 


1 PROBRAnnER 


: M PERDUE 


1 SYSTEM EBUATEB 




1 — — 

1 
PORTA 


. 


*D3«» 




PACTL 


m 


*D3«2 




AUDCTL 


m 


*D2«S 




AUDFl 


m 


*D2«* 




AUDCt 


m 


•D2«t 




8ETVBV 


m 


*E49C 




XITVBV 


m 


•E4&2 




SIOINV 


M 


•E46S 




PADDU* 
1 


■ 


•»27» 
•80 




> PAGE 


ZERO 




I 

INKEY 






PLTBU 




•SB 




PARAn 




*90 




STATE 




*9B 




TIME 




*A» 




TEMP 




•B0 




ATTACK 




•B3 




DECAY 




•B& 




SUSTAIN 




•B7 




RELEASE 




*BB 




1 


»■ 


• 200« 




1 INITIALIZE 


TABLES, 


VARIABLES AND I/O 


INIT 


LDA 


•*3B 


ISBT UP TO WRITE 




8TA 


PACTL 


■DIRECTION BITS 




LDA 


•«B0 


ID7 — •-. INPUT 




STA 


PORTA 


ID6-D0 " OUTPUT 




J8R 


SIOINV 


UNIT FOR BOUND 




LDX 


• >K8CN 


IVBI ADDR HIBH 




LDY 


• <K8CN 


IVBI ADDR LOW 




LDA 


• *07 


1 DEFERRED VBI 




JSR 


SETVBV 


1 ENABLE VBI 




LDA 


• 


IGET ZERO 




STA 


AUDCTL 


1 RESET AUDIO CTRL 




LDX 


»7 


■DO EI8HT BYTES 


CLR4 


STA 


STATE, X 
TIME, j( 


IZERO STATE TBL 




8TA 


■ZERO TIME TBL 




DEX 




INEXT BYTE 




BPL 


CLR4 


ID0NE7 NO. 




LDA 


••A0 


IZERO VOLUME 




LDX 


•7 


■DO EIBHT BYTES 


CLRl 


STA 


PARAM.X 


IZERO PARAH TBL 




DEX 




INEXT BYTE 




BPL 


CLRl 


IDONE? NO. 




LDA 


••FF 


INULL VALUE 




LDX 


•*0F 


IDO 16 BYTES 


CLR2 


STA 


INKEY, X 


1 INIT KEY BUFFER 




DEX 




INEXT BYTE 


1 


BPL 


CLR2 


IDONE? NO. 


LOOP 


J MP 


LOOP 


ILOOP FOREVER 


! ?-?!!_!^E!^?????_??!'* build'inkey'table 











K8CM LDX JS I SET NOTE COUNTER 

b?5 S!i!. I PREPARE TO RESET 

?IS Ea^Tft I RAISE RESET 

■^t>< fcSX "^ UNIT COUNTER AND 

**■" 21^ „ »"SE AS TIMER 

PEk 51* ITIME UP? NO. 

kS? !!»,. 'SET ZERO 

ifR'i ?I? E22I? I CLEAR RESET 

KB2 LDA PORTA I BET NOTE 

£2E £5"^^ I SAME NOTE? 

?2S S25- "*"■ TRY ABAIN 

S5£ !S?S 'l^**" OF KEYBOARD? 

BEO DONE I EX IT MHEN DONE 

gOL A ,KEY DOWN? 

BPL KB2 ILOOP IF NO 

2S5 ?„„^ I RESTORE DATA 

Itn-x 2Z2 iSKSJf'" ISTORE IN BUFFER 

""' E2E £22^* I CHECK KEYBOARD 

BEQ KB3 I SAME DATA? YEB. 

21." „_„ ""^'^ COUNTER 

2EV 5.^2.. » I BUFFER FULL? NO. 

BMI ALCHAN I CONTINUE 

DONE LDA »»FF I UNUSED FLAB 

KB4 STA INKEY, X ICLEAR uSuSED 

21." .,«. I BUFFER LOCATIONS 

BPL KB4 IDONE? NO. 

! SkfcOSSI^ ioUND~CHANNEL8 
I AND BET RELEASE STATE 

I PART ONE OF THIS ROUTINE CHECK8~F0R 

I ?S2f gSXNSi[''"°"' '*•"' ""-^T^SA^ig 

I 

I 

ALCHAN LDX 03 |SET CNTl 

ALCHl LDA PLTBL,X I BET NOTE 
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CHP •«FF 
BEB ALCH4 
LDY #3 
CHP INKEY.Y 
BNE ALCH3 
LDA »*fF 
8TA INKEY.Y 
LDA STATE, X 
CMP #3 
BNE ALCH4 
LDA •« 
8TA TIHE.X 
BTA STATE, X 
LDA ttAl 
BTA PARAM,X 
BNE ALCH4 

DEY 

BPL ALCHZ 



(NULL KEY? 

IYE8. BET NEXT 

I SET CNT2 

I COMPARE NOTES 

I EQUAL? NO. 

■CLEAR KEY FLAB 

I TO INKEY BUFFER 

I BET NOTE STATE 

■RELEASE? 

INO. CONTINUE 

IVES. SET ZERO 

I ZERO TIME 

(SET ATTACK STATE 



I END OF INKEY? NO 



I 

DEC 



BTA STATE, X IFOR NEXT PASS 

LDA ttAB I SET PARAM VALUE 

BNE TR2 I CONTINUE 

LDA TIME, X I BET TIME VALUE 

CMP DECAY I DECAY TIME? 

BMI TR3 I NO. CONTINUE 

LDA •« I BET ZERO 

STA TIME,X (RESET TIME 

LDA PARAH,X I NOTE PARAMETER 

SEC I SET CARRY 

BBC •! I DECREMENT VOLUME 

CMP SUSTAIN (SUSTAIN LEVEL? 

BPL TR2 I.BT. CONTINUE 

LDA 92 (STATE - SUSTAIN 

STA STATE, X (FDR NEXT PASS 

LDA SUSTAIN (BET PARAM VALUE 

JMP TR2 (CONTINUE 



( CHECd 


KEYS 


NOT DOMN FOR RELEASE 


1 

( 


LDA 


STATE, X 


(BET NOTE STATE 




CMP 


•3 


(RELEASE STATE? 




BEQ 


ALCH9 


(YES. CONTINUE 




LDA 


• 3 


INO. SET RELEASE 




8TA 


STATE, X 


1+ CHK IF ACTIVE 




LDA 


•0 


I8ET ZERO 




STA 


TIME, X 
PAR A A, X 


(CLEAR TIME 


ALCH9 


LDA 


ISETNOTE PARAH 




CMP 


•»A1 


IVOLUHE > 0? 




BPL 


ALCH4 


lYES. NEXT KEY 




LDA 


•»FF 


INO. CLEAR KEY 




STA 


PLTBL, X 


IFROM PLTBL 




LDA 


•*A0 


lAND SET VOLUME 




STA 


PAR AH, X 


ITO ZERO 




LDA 


•0 


IBET ZERO 




STA 


STATE, X 


1 STATE TO ATTACK 




STA 


TIME.S 


ITIME TO ZERO 


ALCH4 


DEX 




INEXT KEY 




BPL 


ALCHl 


(DONE? NO. 


( PART 


TWO OF THIS ROUTINE PUTS NEW 


1 KEYS 


INTO UNUSED PLTBL REBISTERS 




LDX 


•3 


(INKEY PNTR 


ALCH5 


LDA 


INKEY, X 


■SET KEY DATA 




CHP 


•♦FF 


(VALID KEY? 




BEQ 


ALCH7 


(NO. SKIP 




LOY 


#3 


(PLTBL PNTR 


ALCH6 


LDA 


PLTBL, Y 


(PLAY TABLE DATA 




CMP 


• «FF 


(EMPTY SLOT? 




BEO 


ALCHB 


lYES. USE IT 




DEY 




ITRY ANOTHER 




BPL 


ALCH6 


IDONE? NO. 




BHI 


ALCH7 


INO EMPTY SLOTS 


ALCHB 


LDA 


INKEY, X 


iBET KEY DATA 




STA 


PLTBL, Y 


(PUT PLAY TABLE 




LDA 


I*A1 


(SET LOW VOLUME 




STA 


PAR AH, Y 


ITO START NOTE 




LDA 


t0 


IBET ZERO 




STA 


TIME,Y 


UNIT NOTE TIME 




LDA 


•»FF 


IBET CLEAR FLAB 




BTA 


INKEY, X 


I CLEAR INKEY DAT 


ALCH7 


DEX 




INEXT KEY 




BPL 


ALCHS 


IDONE? NO. 


I PART 


THREE 


8IVE8 ANY REHAININB NEW 


( KEYS 


PRIORITY OVER 


RELEASED KEYS 




LDX 


•3 


(INKEY INDEX 


ALCHIV 


LDA 


INKEY. X 


(BET KEY 




CHP 


•»FF 


(VALID KEY? 




BEB 


ALCHt4 


(NO. TRY NEXT 




LDY 


t3 


(PLTBL INDEX 


ALCHll 


LDA 


STATE, Y 


(BET NOTE STATE 




CHP 


#3 


(OPEN SLOT? 




BED 


ALCH13 


(YES. CONTINUE 




DEY 




(TRY NEXT 




BPL 


ALCHll 


(DONE? NO. 




BHI 


ALCH14 


(NO EHPTY BLOTS 


ALCH13 


LDA 


INKEY, X 


(SET KEY DATA 




STA 


PLTBL Y 


(PUT PLAY TBL 




LDA 


••Al 


(VOLUHE - 1 




STA 


PARAM, Y 


(START SOUND 




LDA 


•0 


(BET ZERO 




BTA 


TIME.Y 


ISET TIME 




LDA 


t»FF 


INULL FLAB 




STA 


INKEY, X 


1 CLEAR INKEY 


ALCH14 


DEX 




INEXT KEY 


1 


BPL 


ALCH10 


(DONE? NO. 


( TRANSIENT BENERATOR (AD8R) 

I __ _• _— 



TR2 
TR3 



LDA TIME.X I 

CMP RELEASE I 

BMI TR3 I 

LDA 00 I 

STA TIME.X I 

LDA PARAA.X ( 

SEC ' ( 

SBC 01 ( 

CHP 0«A0 I 

BPL TR2 I 

LDA 00 I 

STA STATE, X I 

LDA tttAB I 

STA PARAM, X I 

DEX I 

BPL TRl I 



BET TIME VALUE 
RELEASE TIHE? 
NO. CONTINUE 
BET ZERO 
RESET TIHE 
NOTE PARAHETER 

BicREHENt VOLUHE 
ZERO VOLUHE? 
NO. CONTINUE 
STATE TO ATTACK 
FOR NEXT NOTE 
ZERO VOLUHE 
STORE PARAH TBL 
NEXT KEY 
DONE? NO. 



OUTPUT NOTES AND VOLUHE PARAHETERS 





LDX 


13 






LDY 


•6 




NOUTl 


LDA 


PLTBL 


X 




CMP 


0«FF 






BNE 


N0UT3 






LDA 


• 






STA 


AUDCl 


Y 




BTA 


AUDFl 


Y 




BTA 


STATE 


X 




BEB 


N0UT2 




N0UT3 


SEC 








SBC 


t*4F 






STX 


TEHP 






TAX 








LDA 


NOTES 


X 




BTA 


AUDFl 


Y 




LDX 


TEHP 






LDA 


PARAH 


X 




BTA 


AUDCl 


Y 


N0UT2 


DEX 
DEY 
DEY 








BPL 


NOUTl 





I NOTE PNTR 
I PARAHETER PNTR 
IBET NOTE 
INULL NOTE? 
INO. PLAY NOTE 
IBET ZERO 
(CLR AUDIO CTRL 
(CLR AUDIO FRED 
(CLR STATE 
(NEXT NOTE 

(SET CARRY 
(SUB KBD OFFSET 
(STORE TEHP 
(USE AS INDEX 
(NOTE FROH TABLE 
(AUDIO FREQ REB 
[RESTORE X REB 
(VOL/DISTORTION 
(AUDIO CONTROL 
(NEXT NOTE 
(NEXT SOUND RES 
(DO ABAIN 
IBET NEXT NOTE 



SET ADSR VALUES 



LDX 03 (LOAD COUNT 

LDA PADDL0,X (PADDLE VALUE 

LSR A (/2 BHIFT 

L3R A (/4 FOUR TIHES 

L8R A (/8 TO BET 

LSR A (/1& HIQH NIBBLE 

BTA ATTACK, X (STORE ADSR VAL 



DEX 

BPL ADBRl 



I DO NEXT 
(DONE? NO. 



LDA SUSTAIN I MOST SIB NIBBLE 



AND t*»F 
ORA •*A0 
CHP 0*AB 
BHI AD8R2 
LDA ••AB 
STA SUSTAIN 



SUSTAIN LEVEL TO 
( *A0 - PURE TONES 
(VOLUME > B? 
(NO. CONTINUE 



CLOCK (ADSR TIMER) 



LDX 03 

INC TIME,X 

DEX 

BPL CLKl 

JMP XITVBV 



FREOUENCY DATA 



LDX 03 (BET NOTE COUNT 

LDA PLTBL, X (PLAY TBL ENTRY 

CMP 0»FF (VALID NOTE? 

BEB TR3 (NO. CONTINUE 

LDA STATE, X (CHECK STATE 

CHP 01 (DECAY? 

BEB DEC (YES. CONTINUE 

CHP 02 I SUSTAIN? 

BEQ BUST IVES. CONTINUE 

BPL REL (3? RELEASE 

LDA TIME.X (START ATTACK 

CHP ATTACK (ATTACK TIME UP? 

BMI TR3 (NO. NEXT KEY 

LDA 00 IBET ZERO 

STA TIME.X I RESET TIME 

LDA PARAH, X I LOAD AND 

ADC 01 I INC VOLUME 

CHP 0*A8 (COHPARE TO PEAK 

BHI TR2 (PEAK? NO. 

LDA 01 (STATE TO DECAY 



.BYTE 243,230,217,204 
.BYTE 193,182,173,142 
•BYTE 133,144,136,128 
.BYTE 121, 114! 108, 102 
.BYTE 96, 91, S3, Bl 
.BYTE 76:72;6S,64 
.BYTE 60, 37, S3, S0 
.BYTE 47:43, 42,40 
.BYTE 37,33,33:31 
.BYTE 29 



RUN ADDRESS 



.ORB 002E0 



.WORD INIT 
.END 
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Attention Programmers! 

ANALOG Computing is interested in programs, articles, and software review submis- 
sions dealing with the Atari home computers. If you feel that you can write as well as 
you can program, then submit those articles and reviews that have been floating around 
in your head, awaiting publication. This is your opportunity to share your knowledge with 
the growing family of Atari computer owners. 

All submissions for publication must be typed, upper and lower case with double spac- 
ing. Program listings should be provided in printed form, and on cassette or disk. By sub- 
mitting articles to ANALOG Computing, authors acknowledge that such materials, upon 
acceptance for publication, become the exclusive property of ANALOG Computing. If 
not accepted for publication, the articles and/or programs will remain the property of the 
author. If submissions are to be returned, please supply a self-addressed, stamped enve- 
lope. All submissions of any kind must be accompanied by the author's full address and 
telephone number. 

Send programs to: 

Editor, ANALOG Computing 

P.O. Box 23, Worcester, MA 01603. 



Symbols and 
funclion keys explained 




^WQ^Gl^AfCE 



CIRCLE #134 ON READER SERVICE CARD 



RENT 



IBM 

Apple - C 64 

Software 



ATARI 



BUY 



Hint Book 

75 Adventures 

$19.95 



ATARI PROGRAMMING AIDS 

TRICK Y TUTORIAL SERIES SALE PRICES 

IMo. 1 DISPLAY LISTS $7 95 

No. 2 SCROLLING $7 95 

No. 3 PAGE FLIPPING $7 96 

No. 4 ANIMATION $7 95 

No. 5 PLAYER MISSILE GR. . . ' ' $7'95 

No. 6 SOUND/MUSIC $7 95 

No. 7 DISK UTILITIES ' $795 

No. 8 CHARACTER GR $7 95 

No. 9 GTIA GRAPHICS $7 95 

No. 10 SOUND EFFECTS $7 95 

No. 11 MEMORY MAP $7 95 

No. 12 SAM TUTORIAL ' ' $7'95 

No. 13 BASIC PROG TOOLS $7 95 

No. 14 ADVANCE PR TOOLS ... $7 95 

No. 15 FANCY FONTS $7.95 

EDUCATIONAL& UTILITIES 

MUSIC MAN $9 95 

INSTEDIT $7.95 

GRAPHICS MACHINE $7 95 

MINI WORD PROCESSOR $4 95 

BOB'S BUSINESS $4.95 

DATABASE DIALER $7 95 

FONETONE $4 95 

BOWLERS DATABASE ' ' ' $495 

GRADE BOOK $4.95 

Call toll-free outside Texas: 1—800—433-2938 
- Inside Texas call: 817— 292-7396 

WEDGWOOD RENTAL 

^^H ,iMik 5316 Woodway Drive I'isxS 

JS^ Wm Fort Worth, Texas 76133 'Jjl 

CIRCLE #135 ON READER SERVICE CARD 
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16K Cassette or 
24K Disk 



GAME 



^^ 





E 
L 
E 
V 
A 
T 
O 
R 



R 
E 
P 

A 
I 

R 
M 
A 

N 



by Fred Caprilli 



You are Dan the Elevator Repairman. You've been 
called into the Polychromatic Hotel to fix its eleva- 
tors, which have been sabotaged and are going hay- 
wire. One problem: this hotel wasn't very well en- 
gineered, and the only way to get to the engine room's 
entrance is to climb the fire escape, which is found 
on alternate sides of each floor as you go up. 

The object, then, is to make your way across each 
floor toward the stairs, avoiding the elevators and, 
eventually, to reach the top right-hand side. (If you 
think this scenario is far-fetched, I suggest you pull 
out ANALOG Computing's issue 10 and read the 
backgromid for Fill 'Er Up!] 



If an elevator hits you (or vice versa), you're sent 
back to the start of the same floor. When you reach 
the other side safely, you will automatically climb to 
the next floor. Reaching the top brings you to the next 
level, where a couple of elevators speed up. Subse- 
quent levels bring more of the fast elevators; level 7 
has a surprise (don't look at the source code — that's 
cheating). 

The top of the screen shows a timer which starts 
counting down from 250 (about 25 seconds) when 
you start a floor. Whatever is left when you reach the 
other side is added to your score, so the faster you 
get across, the higher your score. 

Score, High Score, Level (starting with 0) and Men 
Left ai'e all shown at the bottom of the screen. I didn't 
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^ ElevatorRepai 



airmail continued 



make allowances for levels higher than 9, so if you're 
good enough to get past level 9, I hope you vuon't 
mind funny characters on the status line. 

Use a joystick to move Dan left and right. Notice 
that you can't really stop in one position — that would 
be too easy, l^owever, repeated deft flicks of the stick 
can help you get out of most situations. Note, also, 
that the spaces between elevators are not all the same 
width. Use this to your advantage. 




Elevator Repairman. 

You get nine men to start with [you'll need them!), 
but no bonus lives are given. If you look carefully, 
you'll notice random elevators "stalling" temporari- 
ly ever few seconds. This changes the pattern of the 
elevators constantly, so that an "impossible" pattern 
won't last for long. 

Some notes on programming. 

Elevator Repairman uses lots of display list inter- 
rupts (DLIsj to generate the multicolored playfield 
and to switch between character sets. Virtually all 
the game runs in the vertical blank interval (VBI), 
where graphics changes can be executed smoothly 
before the screen is drawn, and where events can be 
monitored eighty times per second. 

This time is also used to play the music, the theme 
from "Peter Guim." I realize this has precious little 
to do with repairing elevators, but it's nice and short, 
and kind of catchy. Note that the bass notes are im- 
plemented in 16-bit sound (so they play more in tune) 
and an "envelope" is applied to shape their sound 
(i.e., the volume is changed during the duration of 
one note). 

All the elevators and Dan are player/missile graph- 
ics. Dan is multicolored (overlapped players 2 and 
3). Elevators 1 and 2 are player 0; elevators 3, 4 and 



5 are missiles 0, 1 and 2; and elevators 6 and 7 are 
player 1. By bit-twiddling the players just like mis- 
siles, I got two seemingly independent objects out 
of each of them. All elevators are quadruple width. 

If you look at the title screen carefully, you'll no- 
tice that Repairman is nicely centered below Eleva- 
tor. This was done by shifting Repairman by half a 
character with the fine scroll register. 

Finally, here are some tips I learned in the proc- 
ess of writing the game (the first I've managed to 
complete), which cost me days of debugging time to 
discover 

When using sound, always include an LDA #3, STA 
SKCTL as part of initialization. The Atari uses PO- 
KEY to make the beeping sound when loading, and 
this can cause your sound not to be heard (not to 
mention making a myriad of expletives issue forth 
from your mouth) when the game first boots up. 

Also, when using VBI routines in conjunction with 
DLIs, do an LDA #$40, STA NMIEN before setting 
them up. Otherwise, your formerly functioning DLIs 
won't work when you implement your VBI routine. 

Typing it in. 

Listing 1 is the BASIC data and data checking rou- 
tines. This listing is used to create both cassette and 
disk versions of Elevator Repairman. The data state- 
ments are listed in hexadecimal, so the program will 
fit in 16K cassette systems. 

Listing 2 is the assembly language source code for 
the game (MAC/65). You don't have to type this list- 
ing to play the game. It's included for those readers 
interested in assembly language. 

Cassette instructions. 

1. Type Listing 1 into your computer, using the 
BASIC cartridge, and verify your typing with 
Unicheck (see page 30). 

2 . Type RUN and RETURN. The program wall 
ask: 

MAKE CASSETTE (0) OR DISK (1)? 

Type and press RETURN. The program will 
begin checking the DATA statements, printing 
the line number of each as it goes. It will alert 
you if it finds any problems. Fix any incorrect 
lines and re-RUN the program, if necessary, imtil 
all errors are eliminated. 

3. When all of your DATA lines are correct, 
the computer will beep twice and prompt you 
to READY CASSETTE AND PRESS RETURN. 
Now, insert a blank cassette in your recorder, 
press the RECORD and PLAY buttons simultane- 
ously and hit RETURN. The message WRITING 
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FILE will appear, and the program will create 
a machine language boot tape version of Eleva- 
tor Repairman, printing each DATA line num- 
ber as it goes. When the READY prompt appears, 
the game is recorded and ready to play. CSAVE 
the BASIC program onto a separate tape before 
continuing. 

4. To play the game, rewind the tape created 
by the BASIC program to the beginning. Turn 
the computer OFF and remove all cartridges. 
Press the PLAY button on your recorder and turn 
ON your computer, while holding down your 
START key If you have a 600 or 800XL computer, 
you must hold the START and OPTION keys 
when you tun on the power. The computer will 
beep once. Hit the RETURN key, and Elevator 
Repairman will load and run automatically. 
Disk instructions. 

1. Type Listing 1 into your computer, using the 
BASIC cartridge, and verify your typing with 
Unicheck (see page 30). 

2. Type RUN and press RETURN. The pro- 
gram will ask: 

MAKE CASSETTE (0] OR DISK (1)? 
Type 1 and press RETURN. The program will 
begin checking the DATA lines, printing the line 
number of each statement as it goes. It will alert 
you if it finds any problems. Fix incorrect lines 
and re-RUN the program, if necessary, until all 
errors are eliminated. 

3. When all DATA hues are correct, you'll be 
prompted to INSERT DISK WITH DOS, PRESS 
RETURN. Put a disk containing DOS 2. OS into 
drive 1 and press RETURN. The message WRIT- 
ING FILE will appear, and the program will cre- 
ate an AUTORUNSYS file on the disk, displaying 
each DATA line number as it goes. When the 
READY prompt appears, the game is ready to 
play. Be sure the BASIC program is SAVEd be- 
fore continuing. 

4. To play the game, insert the disk contain- 
ing the AUTORUNSYS file into drive 1. Turn 
your computer OFF, remove all cartridges and 
turn the computer back ON. Elevator Repairman 
will load and run automatically. 

That's it. I hope you don't fall down any elevator 
shafts, n 

Fred CapriJJi is an In/ormation Analyst in Ontario. 
He has had his Atari 800 for three years and has 
served as president of the Hamilton-Burlington- 
OakviUe Atari Users Group. 



Listing 1. 
BASIC listing. 

18 REM **» ELEVATOR REPAIRMAN «»» 

29 TRAP 20:? "MAKE CASSETTE COJ , OR DI 
SK C1)";:IHPUT DSK:IF DSK>1 THEN 20 

30 TRAP 4eoeO:OATA 0,1,2,3,4,5,6,7,8,9 
,0,0,0,0,0.0,0,18,11,12,13,14,15 

40 DIM DATS C91], HEX C22) : FOR K=e TO 22: 

READ N:HEXCX)=N:NEKT X:LINE=99e:REST0R 

E 1000: TRAP 120:? "CHECKING DATA" 

50 LIHE=LINEHHO:? "LIHE:";LINE:READ DA 

T$:IF LENCDAT$)<>90 THEN 220 

60 DATLIN=PEEKC183)+PEEKC184)«256:IF D 

ATLINOLINE then ? "LINE ";LINE;" MISS 

ING!":END 

70 FOR X=l TO 89 STEP 2 :D1=ASC CDAT$ CX, 

XJ > -48 : D2=ASC CDAT$ CX+1 , X+1) ) -48 : BVTE=H 

EX(Dl)«ieHKHEX(D2] 

80 IF PASS=2 THEN PUT ttl, BYTE: NEXT X:R 

EAD CHKSUM:GOTO 50 

90 TOTAL=TOTAL+BYTE:IF T0TAL>999 THEN 

T0TAL=T0TAL-1000 

100 NEXT X:READ CHKSUM:IF TOTAL=CHKSUM 

THEN 50 
lie GOTO 220 

120 IF PEEKC195I06 THEN 220 
130 IF PASS=0 THEN 170 
140 IF NOT DSK THEN 160 
150 PUT ttl, 224: PUT ttl, 2: PUT ttl, 225: PUT 

ttl,2:PUT ttl,0:PUT ttl,32:CL0SE ttl:END 
160 FOR X=l TO 21: PUT ttl, 0: NEXT X:CLOS 
E ttl: END 

170 IF NOT DSK THEN 200 
180 ? "INSERT DISK WITH DOS, PRESS RET 
URN";: DIM INS CI): INPUT IN$:OPEN ttl, 8,0 
,"D:AUTORUN.SYS" 
190 PUT ttl, 255: PUT ttl, 255: PUT ttl, 0: PUT 

ttl, 32: PUT ttl, 66: PUT ttl, 40: GOTO 210 
200 ? "READY CASSETTE AND PRESS RETURN 
" ; : OPEN ttl , 8 , 128 , "C : " : RESTORE 230 : FOR 
X=l TO 40: READ N:PUT ttl, N: NEXT X 
210 ? :? "MRITING FILE":PASS=2:LINE=99 
0: RESTORE 1000: TRAP 120: GOTO 50 
220 ? "BAD DATA: LINE "; LINE: END 
230 DATA 0,17,216,31,255,31,169,0,141, 
47 , 2 , 169 , 60 , 141 , 2 , 211 , 169 , , 141 , 231 , 2 , 
133 , 14 , 169 ,56,141, 232 , 2 

248 DATA 133,15,169,0,133,10,169,32,13 
3,11,24,96 

1000 DATA A93C8D82D3A9008D4402A9018509 
A91985eCA920850D20EF20D820242520C12020 
072420512020EB23A5A1F01A,956 
1010 DATA A9088DlFD0ADlFDe4906D0F985Al 
A907A062A2E4205CE44C1920A59DF0DE2e0724 
4C2920A2008E2F02A9408D0E,813 
1020 DATA D4A92D8D3002A9278D3102A9688D 
ee02A9218D0ie2A0C9A221A907205CE4A93D8D 
2F02A9C08D0ED4A9eA8DC402 , 342 
1030 DATA A9008DC5028DC80285BCA9CC8DC6 
e2A95e8D88D2A9038D8FD2A9AA8D03D28D05D2 
8D07D2A9FF85BF85BEA90E85 , 169 
1040 DATA BDA237BDE4279D00e6CA10F760A9 
eeA2109591CA10FBA9e285B3A990A2059DAE26 
CA10FA8DC926A9FF85B2A999 , 102 
1050 DATA 8DB92eA9eB8D3027A926SD312760 
A205A9909DBE26CA10FA60A9388D07D4A9038D 
1DDOA900A899603B99003C99 , 981 
1060 DATA 003D99003E99003F88D0EEA007B9 
BC259900D08810F7A94eS5B0201423A97A8DC0 
02A9F88DC102A9488DC202A9,147 
1070 DATA 908DC302A93F8D08D08D09D08D0C 
D0A9ee8D0AD88D0BD0A9218D6F02A93E858C85 
848588A93F858ES58685SA60,460 
1080 DATA 488A48A206A9C28D0AD48Ee9D445 
4F254E8D0AD48D1AD0A9218D0102A98D8D0002 
68AA6840488A48A9008D0AD4 , 55 
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continued 



1090 DATA 8DlADeAe91BDC425454F254E8DeA 

D48DlAD0E691A591C90BI>eieA9E08D09l>4A900 

85918DieD0A9e88D00e2A921 , 482 

1100 DATA SD0ie2e8AA6840A5AlF0034CDC22 

A59CD0eDA2eeB5A2C9201008C9441004A9eiD0 

eAC99F3e08C9C130e4A90e95, 230 

1110 DATA A9CA10E3A286E4B5000CA5B6F088 

CeB6A5B62903F032BDDe258581B5A2858eBDCF 

2549FF8582B5A9F00FB592F0 , 799 

1120 DATA 04FeA2Ee80F6A2E6804C3422B592 

F004DeA2Ce80D6A2C68e20F222CAieBBA514De 

e320E222A59BF08620C2234C , 776 

1130 DATA D622A59CF006208D244CDC22A49A 

B9E825C5B0D010C00A30e62eiA254CD62220B3 

234CDe2220ei25F00eA97885 , 482 

1140 DATA 9CD05DEeB4A5B4C5B33055A90085 

B4AeB22eA023E4B2F003206124A5B23041A49A 

B9DD25C5B0F01818B9202e69 , 308 

1150 DATA 0FA8A5142987C9043004A918D0e2 

A924990e3EA5B2eA900BA5BeC940Fei5C6B04C 

CE22A5B0C9B8F00AE6B0A5B8 , 688 

1160 DATA 8D02D08D03D02024232075258D1E 

De4C62E4AD0AD22907C9e7F0F785B5A98085Be 

e8A00F2e06238SB18025821D,504 

1170 DATA CF25918088C001D0F2B180258291 

8e88B1802582918060A286AD0AD2293F0A6928 

95A2CAieF3e0A59BD042A5BA, 155 

1180 DATA DeoeA5B9290FF038F838A5BBE911 

85BBA5BAE90e85BAA5B9E90e85B9D8A5BA290F 

09908D732eA5BA4A4A4A4A09 , 827 

1190 DATA 9e8D7226A5B9290F85B9e9908D71 

26A9e085B860A203F818CAB59E75B8959E8ADO 

FeD885B885B985BA85BBA202 , 847 

1200 DATA A005B59E48290F099099AE26684A 

4A4A4A09988899AE2688CA10E76eADe0D329e8 

F009ADOeD32904D004A90185,358 

1210 DATA B26e206B23A9ie859BA49AB92e26 

85Bie0A000A5B185838585C6BlA5B185878589 

B1839187B1859189C8C0103e , 181 

1220 DATA F3A90091879189Ce9BD0e2E69AA9 

0085B8A90285B9A95085BAA9928D7126A9958D 

7226A9908D732660A499C007 , 82 

1230 DATA 30e4A9ei85B3Ce043002A004980A 

A8B91626858FC8B916268590Ae06B18F999200 

8810F820FA20A900859A2048 , 658 

1240 DATA 2420EB23A59909908DC926A90085 

9D60A49AB9DD258D02D08D03D085Be206124A9 

0e854DA9FF85B260A49AB928 , 85 

1250 DATA 26858B858DA00FA5B26AB0eEB94B 

2e918BB95B26918D8810F360B92B2e918BB93B 

2e918D88ieF360A9008D00D2 , 285 

1260 DATA 8D82D28D04D2C69CA59CF02AC93C 

1806A90e8D0eD2602903D054A5B2Fe0B206124 

A9Q085B2A928D009286124A9 , 182 

1270 DATA 0185B2A9408D06D2602e4824CEB9 

26ADB926290FD02BA9CA8D3e27A9268D3127A9 

0185A1A200BDAE26DDBE2630 , 11 

1280 DATA 13D00eE8E00630Fie0A205BDAE26 

9DBE26CAieF760ADeED00D0FD02903De0BADe8 

DeODe9D80DeADe290C8DlEDe , 781 

1290 DATA 6020eB23E699A901859D60A9008D 

2F028DC4e2A95B8D3e02A9278D3ie2A93D8D2F 

02A98E80C502A9048D04D4AD, 185 

1300 DATA eBD4D0FBA8AeB78D0AD48DlAD0E8 

8A29F009e8C8C0FeD0EFE6B7A9e88DlFD0ADlF 

De4986F0088D0AD48DlAD0D0 , 524 

1310 DATA D16eA5BD10e6A90E85BDE6BCA5BC 

2907A8B9DA2e8D00D2B9E22e8De2D2A6BDBDEA 

268De3D2CeBDASBF1813E6BE , 659 

1320 DATA A4BEC81A3086A9FF85BED00FB913 

2785BFA4BEB9F9268D04D2C6BF6e48A0404e6C 

7C8C008222B2421252723262 , 998 

1330 DATA E406C00Ce30C30C0eC3C3C3B3B3B 

3D3D40B840B840B840B840B840B84eB840B840 

B840B848B88000000000ee08 , 842 

1340 DATA oooieooooieooeoieioeoioooioo 

Oeoiei810180ei0181010iei0101F325FA2501 
2608260F26COBeAe9e807e60, 573 



1350 DATA 5040302e00eF3FlC347D7D6F0602 

lE3F3F3FlE0C0eOF3F038B02e210188ElE3D39 

391E8008787ElCie5F5F7B30 , 627 

1360 DATA 203C7E7E7E3C18e0787E60682020 

e40C383C5E4E4E3COeOOeOOe8ee00090909080 

000800000000014680460000, 706 

1370 DATA 4100410041004600460503460046 

00004100410041004600460201460046000041 

004180410046004604332300 , 92 

1380 DATA 909e98909090002D252E00900028 

29009090909090900026253600900000002721 

2D25002F362532ee00008066 , 901 

1390 DATA 6B96eBEA6B036435352F352C3528 

2AA2A6AAA8A8A8A8A8A8A8A7A5A3A0Ae445ie0 

4428390e51443C390039e039 , 277 

1400 DATA e0393C44515B5ieC6000e0722259 

721313630E8E0E13e812e012e0121313131313 

0E0E7F507070C66B26C77B26 , 779 

1410 DATA C78B26C79B2eC78B26C79B26C78B 

26C79B26C78B26C79B26C78B26C79B26ie46AB 

2686412D2770707070707047 , 812 

1428 DATA 7C277017707046A027707046B027 

70067e7e56D0277070415B27eoe00000252C25 

3621342F3200eeOOOOe0800e , 560 

1430 DATA e0003225302129322D212EOOOOee 

e800e0223900263225240023213032292C2C29 

000000000823090011191815 , 670 

1440 DATA 0000e00e212E212C2F27e0232F2D 

303534292E27Q00e0000707265737300737461 

727400000080000000000080 , 433 

1450 DATA 0000008080808080808080010181 

010101010180FFS0FF80FF80FFeiFF01FF01FF 

81FF3C7E7EE7E7FFFFFF08e8 , 576 

1460 DATA 8808080808888000000000000000 

eeooeooeeooooooooooooooooooeeooooQoooo 

000000000000000000000000,624 



CHECKSUM DATA. 

(see page 30) 

18 DATA 321,351,496,811,423,729,200,60 
3 , 555 , 573 , 694 ,613,29, 205 , 214 , 6817 
160 DATA 737,198,962,763,491,30,155,11 
1,169,532,713,916,176,84,847,6884 
1060 DATA 885,935,152,991,664,77,734,7 
16,800,874,516,687,143,19,844,9037 
1210 DATA 620,981,554,931,767,726,958, 
?S/2^^i51''33''^50,508, 777, 628, 9941 
1360 DATA 92,812,974,741,319,66,975,81 
7,907,825,412,6940 



Listing 2. 
Assembly listing. 



ELEVftTOR REPAIRMAN 
bv Fred Caprllll 

(c) 19B5 
Analog Conputlng 



/UP\ 

i — 1 

SON/ 

\/ 



VD3L3T 




»0200 


aOLSTL 




• 0230 


9DMCTL 




«022F 


aRACTL 




• D01D 


NMIEN 




»D4aE 


W8YNC 




• D40A 
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COLBAK 




•oaiA 


CHBASE 




• 0407 


PMBASE 




»D407 


H8CR0L 




*D404 


VCOUNT 




*D40B 


HPOSPB 




• D000 


HP0aP2 




• D002 


HPOBPS 




*D003 


CDLRPB 




• 02C0 


COLRPl 




»02C1 


C0LRP2 




• 02C2 


C0LRP3 




»B2C3 


aizEpa 




• D00B 


31ZEP1 




• D00? 


aiZEP2 




«D00A 


9IZEP3 




• D00B 


SIZEM 




*D00C 


RANDOn 




*D20A 


3ETVBV 




•E4ac 


XITVBV 




*E462 


CDN80L 




•D01F 


STICK 




•D300 


P2PL 




»D00E 


P3PL 




• D00F 


MBPt 




«D008 


MIPL 




»D»09 


M2PL 




•D00A 


CDLPF0 




»D«16 


HITCLR 




• D01E 


JIFFY 




»14 


8PRIQR 




*026F 


CDLDR0 




•02C4 


CDLORl 




«02C3 


C0U0R2 




•02C6 


3C0LBK 




• 02CS 


BOOT 




•09 


C0LD9T 




*0244 


DOaiNI 




»0C 


ATRACT 




• 4D 


DRKMSK 




• 4E 


CQLRSH 




»4F 


CH3ET 




•0600 


AUDF0 




*D200 


AUDFl 




*D202 


AUDCl 




»D203 


AUDF2 




*I]204 


AUDC2 




»D2B5 


AUDF3 




• D20& 


AUDC3 




»D207 


AUDCTL 




•0208 


BKCTL 




• D20F 


PACTL 




• 0302 


f 

1 Pl«v«r 


/ 


niMils Ar«4 


1 


»m 


• 3800 



I 

I Malnlin* (non-VBI> code 

I 

MAIN LOA DVERFLB lOama over? 



LOA 
8TA 



#64 
DANHOR 



BEQ MNl 
LOA »B 
9TA C0N30L 
LDA C0N80L 
EOR »& 
BNE nN0 



INo. 

lYa* 



J3R SETHTS 



IY*«, so cl«ar 

IC0N80L and 

I noil START ka 



I 



BOll START 

it prassad? 
INo. 

STA OVERFLG |Ybi, zero flag 
LDA #7 (back to 
LDY • <XITVBV (Standard VB 
LOX • >XITVBV (routine 
JSR SETVBV 

land start at top 
(Check neH level 
(Not yet, loop 
(Yes, neM level 
(and loop back 



anP R8T 
LDA NEWLVL 
BEQ MAIN 
JSR SLEVEL 
OMP MAIN 



( 

PMAREA 

MAREA 

P0AREA 

PIAREA 

P2AREA 

P3AREA 

( 

I Page 



.DS *0300 

.08 *0100 

.03 seiOB 

.03 teiee 

.DS *0100 

.DS ^0100 

Zero Variables 



I 

EHT 

EM3K 

018 

D2S 

010 

020 

DANl 

DAN2 

E3P 

COFSET 

ESPEED 

LEVEL 

FLOOR 

CLIMBF 

DIEFLAS 

NEWLVL 

SCORE 

QVERFLB 

HITE8 

DIR 

OANHOR 

CLIMBHT 

OANDIR 

0AN3PD 

SPOCNT 

ELDLAY 

DLYCNT 

CDLCNT 

TIME 

BA3CNT 

BASTin 

TRBCNT 

TRBTIM 

I 

I Qame i 



.03 

.03 

.03 

.03 

.08 

.OS 

.03 

.03 

.DS 

.DS 1 

.08 7 

.08 1 

.08 

.08 

.DS 

.08 

.DS 

.OS 

.03 

.08 

.OS 

.08 

.DS 

.08 

.08 1 

.DS 1 

.08 1 

.08 1 

.DS 4 

.08 1 

.03 1 

.03 1 

.OS 1 

tarts here 

•- ^2000 



IP/M ht 
(Ask to 
(cl tab 
( sane < 
icl Imb 
( same 
IP/M pg 
IP/H pg 
I Speed 
I DC I tb 
(elevat 
( level 
( curren 
(Dan cl 
I indlca 
I flags 
I score 
I game o 
I elevat 
I elevat 
I Dan ' B 
icl Imb 
IDan* • 
I Dan' a 
( speed 
lelev » 
■death 
( color 
Itime 1 
(Bass n 
(Bass t 
(Treble 
ITreble 



for e 
clr b 
fr hei 
P3) 

to hBl 
P3) 
Dan 
Dan 
tbl pn 
1 of f ■ 
or Spa 
no. 

t floo 
1 mbing 
tes dy 
new 1 e 
in BCD 
ver St 
or hel 
or di r 
hor po 
height 
direct 
Speed 
counte 
to St 
del ay 
counte 
n BCD 
ote en 
i <ner 
count 
timer 



lev 
its 
ght 

ght 

(P2) 
(P3) 
tr 
t 
eds 



fl, 

iny 

atus 
ghts 



ion 
11 

tr 



LOA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
CLD 
JSR 
JSR 
J8R 
JSR 
JSR 



«S3C 
PACTL 

• 
COLDST 

Hi 

BOOT 

• <RBT 
DQSINI 
» >RST 
OOSINIi 
CLRHI 

TITLE 

ZERO 

SLEVEL 

SETUP 

INITIM 



(cassette off 
(if necessary 



(Mare start 
(Disk boot OK 



I (Trap S/RESET 
(clear hiscore 
(just in case 
(Title screen 
( Ini t . variable 



( End of Mainline cade 

( 

SETUP LOX *a 

STX 8DMCTL (Disable DMA 

LDA tS40 

STA NMIEN (Disable OLI 

LDA » <DLiaT 

STA 8DLSTL (Point to 

LDA » >DLIST (the gane 

STA SDLSTL-M (display list 

LDA • <DLI1 (DLI vector 

STA VD9LST 

LDA » >0LI1 

STA V03LST-H 

LOY • <VBI (Set up VBI 

LOX • >VBI 

LDA »7 

JSR SETVBV 

LOA »*30 

STA 3DMCTL 

LOA »*C0 

STA NMIEN 

LDA ••0A 

STA COLOR0 

LDA •*00 

STA COLORi 

STA BCOLBK 

STA BASCNT 

LOA ••CC 

STA C0L0R2 



LDA 

STA 
LDA 
STA 
LDA 
STA 
LOA 
STA 

LDA 
STA 
STA 
STA 
LDA 
8TA 
STA 
LDA 
3TA 
LOA 
3TA 
STA 
STA 
LDA 
STA 
STA 
STA 
RTS 



t«7A 
COLRP0 

• •FS 
COLRPl 

• •4a 
C0LRP2 

• •90 
C0LRP3 

• •3F 
SIZEP0 
SrZEPl 
SIZEM 

• 

8IZEP2 
8IZEP3 
**21 
SPRIOR 



lelev heights 
laet P/M colors 



IP/M widths 

I quadruple for 

lelevators (P0, 

|Pl,M0-M2) 

Isingle for 

IDan 

I (P2,P3> 



iMultlcolor PL 

>P2AREA I Set up zero 

DANl+1 Ipage pointers 

DlS+1 

DlOti 

• >P3AREA 

DANai-l 

D2S<-1 

D2D-H 



The Display list interrupt routines 
iSave registers 



I Deferred 

IP/M enable, and 
inarrow playfield 

lenable DLI's 

IMhite 

Ifor stairs 

Iblack 

(for shafts 

(and screen top. 

(bass notes index 



I 



(or 
(fo 



r digits 



I 



LDA ••50 
STA AUOCTL 
LDA ^3 
STA SKCTL 
LDA ••AA 
STA AUDCl 
STA AUDC2 
STA AUDC3 
LDA ••FF 
STA TRBTIM 
STA TRBCNT 
LDA ^14 
STA BABTIM 



(li-blt ch, 
|8-bit ch. 



0/1 
2,3 



(reset POKEY 
(vol.10, dlst.l0 



(timer for treble 
(treble note cntr 



(timer for bass 



( Download charset to page 6 

LDX •SS (• of bytes 
CDL LDA CSETB.X 

STA CHSET.X 

DEX 

BPL CDL 

RTS 
( 
ZERO LOA •0 (zero variables 

LOX •0VERFLB-C0F3ET 
Zl STA COFSET, X 

OEX 

BPL Zl 

LDA •2 

STA DANSPO 

LOA ••90 

LOX kS 
LI STA SSCORE,X (0 score 

OEX 

BPL LI 

STA LEVBYTE (level 

LDA ••FF 

STA DANDIR 

LDA ••99 

STA MENBYT 

LOA • <TLINE 

STA MSB 

LDA • >TLINE 

STA MSO+l I Top shoMS timer 

RTS 



I Dan moves. . . 
(every other VBI 
(ATASCII Inv "0" 



ino Initial dir. 
(digit 9 on 
(screen - 9 men 



PHA 
TXA 
PHA 
LDX 
LDA 
STA 
STX 
EOR 
AND 
STA 
STA 
LDA 
STA 
LDA 
STA 
PLA 
TAX 
PLA 
RTI 

PHA 
TXA 
PHA 
LOA 
STA 
STA 
LDX 
LDA 
EOR 
AND 
STA 
STA 
INC 
LDA 
CMP 
BNE 
LOA 
STA 
LOA 
STA 
STA 
LDA 
STA 
LDA 
STA 
PLA 
TAX 
PLA 
RTI 



• >CHSET (new charset 

• •C2 
WSYNC 
CHBASE 

CQLRSH (aask attract 

ORKtISK 

USYNC 

COLBAK (change color 

» >DLI2 

VDSLST-H 

• <DLI2 

VDSLST (next DLI 



(Restore regs 



iSave registers 



• 
MSYNC 

COLBAK (Black celling 

COFSET 

COLORS, X (get color 

COLRSH " 

DRKMSK 

M3YNC 

COLBAK 

COFSET 

COFSET 

• 11 
EX 

• •E0 
CHBASE 

• 

COFSET 
COLPF0 



mask attract 



line index 

Itable index 

(last DL17 

( no. 

(Yes, so restora 

(default cset. 



(and zero index 
(and color 0. 

• <DLIi (Point back to 

VDSLST (first DLI. 

tt >DLI1 

VDSLST-fl 



iRestara registers. 



( The Vertical Blank routine 



VBI LDA 
BEQ 
JMP 

V0 LDA 
BNE 

( 

( Check screi 

( and reversi 

( 



OVERFLO (Skip VBI if 

V0 (game over. 

XVB 

DIEFLAB (Dan dying? 

DAN (Yes, skip Slavs 

rn heights for elevators 
t direction if necessary 



(hi to 000000 



LDX •a 

LDA ••90 

STA HISCORE, X 

DEX 

BPL CRl 

RTB 

LOA • >PMAREA 

STA PMBASE (to P/M area 



C3 
C0 



lenable P/M DMA 
Iclear P/M MrBA 



II 



•In dli 



iraset timer 



LOA »Z 

BTA 8RACTL 

LOA »0 

TAY 

STA MAREA, Y 

BTA P0AREA,Y 

STA PIAREA, Y 

STA P2AREA,Y 

STA P3AREA,Y 

OEY 

BNE CLN 



LDY »7 (8 P/M Iocs 

LDA ELEPOB.Y (Init P/M 
STA HPO8P0,Y (horizontal 
DEY (next P/M 

BPL INITPM (done? No. 



C2A 
C2 



LDX 
LDA 
CMP 
BPL 
CMP 
BPL 
LDA 
BNE 

CMP 
BMI 
CMP 
BMI 
LDA 
STA 
DEX 
BPL 



• & 
HITE8,X 

• 32 
Cl 

• 68 
Cl 

• 1 
C2A 

• 159 
C2 

• 193 
C2 

• 
DIR,X 

C0 



(do 7 elevator 

(At top? 

(No. skip 

( Intermediate 

(Soing down* 



I inter medi ate 

■At bottom? 
INo. no change 
I Yes, going up ! 

(next elevator 
(done? No. 



( Now set up for movement of elevators 
( 

LOX *t> (do 7 elevators 

Ml CPX ELDLAY (slow it down? 

BNE M2 (No. 

LOA DLYCNT (Yes. 

BEQ M2 (Delay over yet? 

DEC DLYCNT (No. 

LDA DLYCNT (count down one 

AND tZ (and skip a turn 
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^ Elevator Repairman 



continued 



SEQ MS lavsry 1/13 mtc. 

LDA ELOCS.X |P/M paaa 

3Tft EHT+1 

LDA HITES.X Ibyt« loc In piac 

BTfl EHT '^ "^ ° 

LDA EMASKS.X I Sat na«k 

EQR •*FF laiva lt« Invaraa 

BTA EMSK 

LDA DIR,X 10-up, 1-dOHn 

BEQ UP 

Sat Up for down novamant 

LDA esPEED.X lalavator apaad 

BEQ Dl 

INC HITES.X 

INC EHT idoubla apaad 

INC HITES.X 

INC EHT inoraal apaad 

JHP M4 



I Bat up for up movaaant 
UP 



LDA 
BEQ 
DEC 
DEC 
DEC 
DEC 



ESPEED.X 

Ul 

HITES.X 

EHT Idoubla Bpaad 

HITES.X 

EHT inornal apaad 



Executa tha aovamant 



«4 
MS 



aSR «V 
DEX 
BPL HI 

LDA JIFFY 
BNE DAN 
JSR ELNEU 



ymovB tha bytaa 
Inaxt alavator 
I dona? No. 

latall elavator? 
) (whan OlFFY-a) 



• 

) CAVvators aona. NOW. wa proc 

I Dan tha Elavator Rapalr Han. 

I 

DAN LDA CLIHBF 

BEQ VBl 

JSR CLIMBl 
,JHP DANEND 



VBl 



VB2 



Icllablno? 

iNo. 

lYaa. raova hla up 

land axlt. 
LDA DIEFLAB IPraaantly dylna? 
BEQ VB2 INo. aklp 
JSR DEATH lYas. kaap dying 

land axlt: 



JPIP XVB 
LDY FLOOR 
LDA STAIRS 
CHP DANHOR 
BNE VB4 
CPY aie 
BMI VB3 
JSR ENDLEV 
JMP DANEND 
JSR SCLinS 
JHP DANEND 
JSR HITCHK 
BEQ VBS 
LDA ttl20 



iHaa ha rmMchma 
Itha atalra? 
INo. 

I Top floor? 
iNo; cllab ataira 
lYaa. ao and It 
land'axlt. 
Unit climbing 
land axlt. 
IChk colllalon 
iDan hit? No. 
lYaa, atart 12B 



8TA DIEFLAB IJlfty daath 
BNE DANEND land axlt 



If wa 
haro la al 
■Idat of h 
tha acraan 



It to hara. it mmMnu our 
thar atartlhg or In tha 
la parlloua trak acroaa 



I 
VB3 



F2 

F3A 

F3 



nVLF 



INC 
LDA 
CMP 
BMI 
LDA 
STA 
LDX 
JSR 
CPX 
BEQ 
JSR 
LDA 
BMI 
LDY 
LDA 
CMP 
BEQ 
CLC 
LDA 
ADC 
TAY 
LDA 
AND 
CMP 
BMI 
LDA 
BNE 
LDA 
STA 
LDA 
ROR 
BCC 
LDA 
CHP 
BEQ 
DEC 
JMP 
LDA 
CMP 
BE 8 
INC 
LDA 
STA 
STA 

JSR 
JSR 
STA 
JMP 



iSpaad countar 



SPDCNT 
3PDCNT 
DANSPD iTlma to aiove? 
DANEND INo, ao exit. 
»« 

SPDCNT iZaro tha countar 
DANDIR iSava old dlr 
JOY idlr changa? 
DANDIR 

noVEDAN INo, aklp 
DRAHDAN lYaa. raSraw hia 
DANDIR 

DANEND iMalt on loyatlck 
FLOOR ■■ 

STARTS, Y I la Dan at atart 
DANHOR I of floor? 
F3 lYaa, aklp naxt 
lantaata faat 



DANHT.Y 

• 13 

JIFFY 

• 7 

• 4 
F2 

• «1B 
F3A 

• •24 

P2AREA,Y 
DANDIR 

A 

MVRT 

DANHOR 

• *40 
DANEND 
DANHOR 
MVLF 
DANHOR 

• *B8 
DANEND 
DANHOR 
DANHOR 
HPDSP2 
HP03P3 



I Bottom of Dan 
Ifor faat. 



I Mod 8 countar 
lat 4 jlfflea? 



I"f. 
I "f • 



it In- byta 
It out" byta 



iRloht or laft? 
IRlght <DANDIR-0) 
Itrylng to paaa 
Haft adga? 
lYaa. atop him 
iDac horizontal 

ITrylng to paaa 
irlght adga? 
lYaa. atop hiffl 
INo. ao aova it 
IpoBltlon ahadow 
land do tha 
Ihorlzontal aova 



TIMER iDo tha tlmar 

MUSIC IDo tha auaic 

HITCLR iclr colllalona 

XITVBV land flnlah VBl! 



Subrout inaa 



I 

I Pick an alavator to atall tB-63 

I 

ELNEH LDA RANDOM 

AND •? IB-7 

CMP »7 

BEQ ELNEM |0-6 

STA ELDLAY 

LDA ••B0 

STA DLYCNT 

RTS 



i 
I 
t 

I 
I 
I 

I 

I top 
I 

MV 



Animata tha alavatora - on antry, 
(EHT) points to tha partlnant P/ft 
araa, and EMSK contalna invarae bit 
maak. to zaro out bita (topa and 
bottoma of alavatora). Elavatora 
ara 12 aolid llnaa plua 2 blanka on 
*■"- -nd 2 on bottoa. 



IX 



13-14 (bottom) 



LDY •IS 

JSR V2 

DEY 

LDA (EHT).Y illnaa 13 to 2 

AND EMSK iClr currant blta 

ORA EMASKS.X I aat naw onaa 

STA (EHT),* 

DEY 

CPY •! 

BNE VI 

LDA (EHT>.Y illna 1 



AND EMSK 
BTA (EHT), 
DEY 



IZaro out blta 
IMlth maak 



LDA (EHT).Y Ulna (top) 

AND EMSK 

BTA (EHT),Y 

RTS 
) 
I Sanarata alavator atartlng haighta 



17 alavatora 

I0-&3 

I0-12& avan 
t40-l&6 avan 



3ETHT8 LDX •6 
SHI LDA RANDOM 
AND ••3F 
ASL A 
ADC •40 
BTA HIT68,X 
DEX 

BPL SHI 
RTB 



I Thla aubroutlna updataa tha 

I countdown tlmar. and puta 1 t to 

I tha acraan 



LDA CLIHBF 
BNE Til 
LDA TIME+2 
BNE T10 
LDA TIME+1 
AND ••SF 
BEQ Til 
SED 
SEC 

LDA TlME+3 
SBC *n 
STA TIME*3 
LDA TIME+2 
SBC •B 
STA TIME+2 
LDA TIMEfl 
SBC •« 
STA TIME*! 
CLD 



LDA TlME*-2 ITaka 3-byta (6 

AND atSF idaciaal digit), 

ORA ••90 Itaka tha low 3 

STA TLINE+B idlglta and put 

LDA TIME+2 | to tha acraan. 



I Don't tima 
llf climbing 



I If don't dac 
iDacimal math 

IFractlonal byta 
I approx . 0. 1 aac 
I (rol I a over 
lavary 6 jlffiaa) 



LSR A 

LSR A 

LSR A 

LSR A 

ORA »*<t» 

STA TLlNE+7 

LDA TIME+l 

AND ••0F 

STA TIME4-1 

ORA ••90 



laova high nybbla 
Ifor 2nd decimal 
Idlglt down to 
llow nybbla 
imaka It ATASCII 
Iput to acraen 
Iwa only want law 
I nybbla here 
I (3 dlgl ta total) 



Tli 
I 



Olgl 
Imaka It ATASCII 

PI? I!:"^^** 'P"* to acraan 

LDA 40 

STA TIME mot uaad 

RTS 



I Thla aubroutlna updataa the acoring 



SCORINB 



SCI 



I when Dan reachea a naw floor 
i 

LDX •S 

SED 

CLC 

DEX 

LDA SCORE. X 

ADC TIME.X 

STA SCORE. X 

TXA 

BNE SCI 

CLD 

STA TIME 

STA TIME-H 

BTA TIME+2 

STA TlME+3 

LDX ^2 

LDY •S 

LDA SCORE, X 

PHA 

AND *%ar 

ORA ••90 



|3-byta (4-dlgit) 
■decimal add 



I Zero out timer 



SC2 



ISava It 
llow nybbla 
imaka It ATASCII 
STA SSCORE.Y Iput on acraan 
PL^ luaa aama byte 

Ihigh nybble 



LSR A 



LSR A 
L8R A 
LSR A 



I we move it 
I down to 
llow nybble 



imaka It ATASCII 
1 Iput to acreen 



ORA ••90 

DEY 

STA saCORE. 

DEY 

DEX _ 

BPL 8C2 

RTB 
I 

I Thla aubroutlna reada the joyatick. 
I 
JOY 



JLR 

JE 

I 

I Thl 

I and 

I 

SCLIMB 



LDA STICK 
AND •& 
BEQ JLR 
LDA STICK 
AND •4 
BNE JE 
LDA ttl 
STA DANDIR 
RTS 



iRaad foyatick 

IRlght? 

lYea. 

INo. left? 
INo, dlr aame 
II - left 



Th 

• can 
It 
aubr 



aubroutlna updataa tha acore 
acta Up tha climb, 

JSR SCORINB lUpdata acore 

LDA ttl6 116 acan llnaa 

STA CLIMBF |to climb. 

LDY FLOOR I index to acraan. 

LDA DANHT.Y Ihaight table 

STA CLIMBHT latart climb hara 

RTS 

aubroutlna makaa Dan climb 1 
line per VBl (if CLIMBFO0) . 

ontinuaa Into tha INITln 

outi ne. 



LDY »0 

LDA CLIMBHT I Set up zero pane 

BTA DIB Ipointera 

8TA D28 

DEC CLIMBHT ideatination la 

LDA CLIMBHT lone acan line up 

STA DID 

STA D2D 

LDA (D18),Y 

STA (D1D),Y 

LDA (D2B),Y 

STA (D2D),Y 

INY 

CPY •li 

BMI CLl 

LDA •B 

BTA (D1D),Y 

STA (D2D),Y 

DEC CLIMBF 

BNE INITIM 

INC FLOOR 



I Move P2 Up one. 
IMove P3 Up one. 



lAll bytea moved? 

INo. 

lEraaa laat line 



I la cl Imb over? 
lYea. naw floor. 



I Thla aubroutlna aata timer to 230 



I 



LDA •B 
STA TIME 
LDA ^2 
BTA TIMEtl 
LDA •*S0 
STA TIME+2 
LDA ••92 
STA TLINE+6 
LDA •*93 
STA TLlNE+7 
LDA •*90 
STA TLINE+S 
RTB 



I2SB decimal 



iLevel 7 or more? 

I No. 

I Yea, BO wa have 

IBUparfaat Dan. 

I Level 4 or more? 

INo. 

lYea, lav. 4 apaad 



I Thla aubroutlna aeta up a new level. 

I Bpeeda of elevators and Dan. tlmar. 

I Dan on bottom, incraaaad level no, 

■ 

SLEVEL LDY LEVEL 

CPY #7 

BMI SL0 

LDA *l 

STA DANSPD 
SLB CPY ^4 

BMI SLl 

LDY •• 
BLl TYA 

TAY I Lev •2 index 

LDA LEVSPD.Y lelev speed tbl 
BTA ESP Unit B page pntr 
INY P V H 

LDA LEVSPD.Y 
STA E3P+1 

LDY •& iDownload elev 
SL2 LDA (ESP).Y IBpeeda to 

STA ESPEED.Y Izero page tbl 

DEY 

BPL aL2 

JSR PMSETUP iraaet P/M gr 

LDA »e 

BTA FLOOR I f 1 oor O 

JSR SFLOOR 

JSR INITIM 

LDA LEVEL 

ORA »»90 Imaka it ATASCII 

STA LEVBYTE Iput to acreen. 

LDA •• 

STA NEWLVL iTurn off flag. 

RTB 
I 

SFLDDR LDY FLOOR Ifind hor. atart 

LDA STARTS, Y 

STA HP0SP2 Iput Dan there. 

STA HP08P3 

STA DANHUR 

JSR DRAUDAN I Draw him 

LDA ttB 

BTA ATRACT Idafaat attract 

LDA *%rr 

STA DANDIR mo initial dlr. 

RTS 
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LDY FLOOR 
LDft DflNHT.Y 
9TA DANl 
STft DAN2 
LDY tlB 
LDA DANDIR 
ROR A 
BC8 S2 



(IndeK to height 
Itbl corr««pondB 
I to P/M mamorv 
(■height' 
(draw 16 byt*B 

IRlght or lo«t7 



I Draw 

I 

S2 



I Draw Dan -facing right 

I 

81 LDA DANRTl.Y |P2 data 

3TA (DAND.Y 

LDA DANRT2,Y I P3 data 

STA (DAN2),Y 

DEY 

BPL SI 

RT8 
I 

Dan facing left 

LDA DANLFl.Y ( P2 data 

8TA (DAND.Y 

LDA DflNLF2!Y I P3 data 

STA (DAN2),Y 

DEY 

BPL 82 

RT8 
I 

I Death subroutine - flip— flop Dan 
I for 1 second, then freeze for 1 
I aecond. If no livee are left, 
) It ende the gaee. 

DEATH LDA •« 

STA AUDFC 

STA AUDFl 

STA AUDF2 iSlIance nueic 

DEC DIEFLAQ flower counter 

LDA DtEFLAB (Done yet? 

lYe 



Itlme for freeze? 
INo. 

lYee 

I si lence 

laktp fllp-ftop. 
INo, flip Dan 
fmvmry 4 jlffiee 



BEO DE2 

CMP »60 

BPL DE8 

LDA te 

STA AUDF3 

RTS 

AND (3 

BNE DE3 

LDA DANDIR 

BEQ DEI 

Hon DRAMDAN Ifllp left 

LDA tt0 (and set up for 

STA DANDIR Irlght flip 

LDA t»2B Ihigh note 

BNE DE» 

JSR DRAMDAN Ifllp right 

LDA •! land set up for 

STA DANDIR Heft flip 

LDA •*40 II OH note 

STA AUDF3 

RTS 



I Death over 
I 



JSR 8FL0OR 
DEC HENBYT 
LDA MENBYT 
AND »»eF 
BNE DE3 



lout Dan back 
I One less nan. . 
lAny Men left? 



DES 
DEA 



lYes, continue. 
LDA » <OVERLN |No, change 
STA liSa I top line LnS 
LDA t >OVERLN |LM8 to show 
STA H3B-H I "SAME OVER" 
LDA *1 iset flag 
STA OVERFLG 

LDX •• iCoepare score to 
LDA S8C0RE.X Ihlgh score 
CNP HISCORE.X Idfglt by digit 
BHI DE3 lit?, no change 
BNE DES Igt?, update hi 
INX inext digit 

CPX VA 
Bnl DE4 
RTS 

LDX ta 

LDA saCORE.X I Hove score 
STA HISCORE.X I to high score 
DEX 

BPL DE6 
RTS 



DE3 
I 

I This subroutine does collision 

I detection. 

I 

HITCHK LDA P2PL 

ORA P3PL 

AND tS 

BNE ENDCHK 

LDA n«PL 

ORA HIPL 

ORA H2PL 

AND t*0C 
ENDCHK STA HITCLR 

RTS 
I 
ENDLEV 



■Did P2 
lor P3 hit 
lelev a, 1,S,&? 
lYes, Dan's dead. 
IDld He (elev 2) 
for HI (elev 3) 
lor 112 (elev 4)7 

IClear collision 



JSR SCORINS I Update score 
INC LEVEL ion to neKt level 
LDA *1 (Flag so mainline 
STA NEHLVL I code can set up 
RTS I a new level 

I 

I This subroutine produces the title 

I screen, and waits for START. 

I 

TITLE LDA •<! 

STA SDHCTL Idlsable DHA 
STA COLORS Iblack letters 
LDA t <TDLI8T iPolnt to 
STA 8DLSTL IDlsplay list 
LDA • >TDLIST Ifor title 
STA BDLSTL'i'l I screen 
LDA VS3D inarrow nlayfield 
STA SDHCTL 





LDA 


*«0E 


Iwhite letters 




STA 


COLORl 






LDA 


*4 


icenter titles 




STA 


HSCROL 




XI 


LDA 


VCOUNT 


1 rainbow backgrnd 




BNE 


XI 


iwalt for line 




TAY 




land keep track 




LDX 


COLCNT 


1 colour counter 


X2 


STA 


HSYNC 


isync to TV line 
istore in reg 




STA 


COLBAK 




INX 




1 inc color 11 




TXA 








AND 


• *F0 


Ibut aake it 




ORA 


•sas 


lluMlnance 6 




INY 








CPY 


**F0 


1 screen bottom? 




BNE 


X2 


INo. 


1 Now 


increase the starting colour for 


1 next 


TV frame, produces scrolllno 


1 rainbow effect 




1 


INC 


COLCNT 






LDA 


• 8 


1 We have some 




STA 


C0N80L 


Itlae left to 




LDA 


C0N80L 


■check for START 




EOR 


t6 


1 Pushed? 




BEQ 


X3 


■Yes, so exit 




STA 


M8YNC 


1 keep stuffing 




STA 


COLBAK 






BNE 


XI 


■Infinite loop 
■unless sent here 


X3 


RTS 




1 This 


subroutine plays the nustc. 


nUBIC 


LDA 


BASTIM 


■New note time? 




BPL 


BNe 


■ No. 




LDA 


• 14 


■all notes 




STA 


BASTIM 


■are 13 jiffies. 




INC 


BA8CNT 




BN« 


LDA 


BA8CNT 


■Set the note. 




AND 


»7 


Imod 8 counter 




TAY 








LDA 


BASSLO, 


Y iBass is Ib-blt 




STA 


AUDF0 


■sound, so stuff 




LDA 


BASSHI, 


Y Ho and hi bytes 
■ In channels 0, 1 




STA 


AUDFl 




LDX 


BASTIM 






LDA 


BA8ENV, 


X 




STA 


AUDCl 


■Apply envelope 




DEC 


BASTIM 


Idee, duration 


1 Melody (Treble) 




' 


LDA 


TRBTIM 


iNote timer done? 




BPL 


TNI 


INo. 




INC 


TRBCNT 


lYes - Inc cntr 




LDY 


TRBCNT 


1 Are we at. . . 




CPY 


»26 


lend of tune? 




BHI 


TN» 


INo. 




LDA 


»»FF 


lYes, reset 




STA 


TRBCNT 


icounter 



BNE TN2 
TN0 LDA TRBDUR.Y Head the 

STA TRBTIM iduratlon 
TNI LDY TRBCNT 

LDA TREBLE, Y iPlay the note. 

STA AUDF2 

DEC TRBTin land dec timer. 

RTS 

us Data Tables 



TN2 

I 

I Varlo 

I 

ELEP08 

COLORS 
EMABKS 
EL0C8 



STAIRS 

ESPEDl 

EBPED2 

E8PED3 

ESPED4 

ESPEDS 

I 

LEVSPD 



.BYTE 72, 160, &4, 64 

.BYTE 108,124,140,0 

.BYTE «82,*2Z,*B2,*42,*1Z,*S2 

.BYTE »72!»32,»62,»E4!»06 

.BYTE *C0,»0C,«03,*0C 

.BYTE »30,*C0,*0C 

.BYTE >P>AREA, >P0AREA 

.BYTE >MAREA, >MAREA 

.BYTE >MAREA, >P1AREA 

.BYTE >P1AREA 

.BYTE *40,»B8,*40,*B8,*4e 

.BYTE •Ba,*40 •Ba,*40:*BB,*40 

.BYTE *BS,*40,*Ba,*4e;*B8 

.BYTE •40,»BB,*40;*Ba,*40,»BB 

.BYTE 0,0:0, 0,0, 0,0 

.BYTE 0, 1,0,0,1:0,0 

.BYTE 1,10 1,0, 1,0 

.BYTE 0: 1 1 1:1 0: 1 

.BYTE 1, 1 1 i;i 1; 1 



I 



.WORD ESPEDl, ESPED2,ESPED3 
.WORD ESPED4; ESPEDS 

i Vertical height of taps of floors 

I 

DANHT .BYTE SCe, SBe, SAfl, •90 

.BYTE •a0,*70:*60;*se 

.BYTE •40, •30, (20 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



• 00 
•34 
•06 
•3F 

• 00 

• 0B 

• 18 

• 39 

• 00 

• 16 

• 30 
»7E 

• 00 
•68 

• 0C 

• 4E 



• 0F 
•7D 
•02 

• 3F 

• 0F 

• 02 

• 0E 

• 39 

• 78 
•3F 

• 20 
»7E 

• 78 
•20 
•38 

• 4E 



•3F,^1C 
•7D,^6F 
•1E:^3F 
•1E,^0C 
•3F,^03 
•02,^10 
•1E,^3D 
•1E,^00 
•7E,^1C 
»SF, ^78 
•3C:*7E 
»3C,»18 
»7E,^60 
•20, ^04 
*3C,^SE 
*3C,«0S 



TOPLINE 

LLINE 

RLINE 

INFOLN 
S8CDRE 

MENBYT 

HI SCORE 

LEVBYTE 

OVERLN 

I 

I Music 

BASSLO 



I 



.BYTE 1,S46,0,^46,0,0,^41,0 

.BYTE ^41, 0, •41,0, •46,0, •46, S 

.BYTE 3,^46,0,^A6,0,0,^41,0 

.BYTE •41, 0, •tl ,0, •46,0, •46,2 

.BYTE l.S46,0,^46,0,0,»4i,0 

.BYTE *41,0,*41,0,^46,0,*4&,4 

.SBYTE "SC ' 

.SBYTE t^ae, "000000" 

.SBYTE " MEN " 

.SBYTE *»80,"0" 

.SBYTE » HI " 

.SBYTE ^'•80, "000000" 

.SBYTE " LEV " 

.SBYTE ♦•80,-0" 

.8BYTE " SAME OVER 

Data 

.BYTE •6B,^6B,^96,*6B 

.BYTE •EA, *6B,^03,^64 

.BYTE •33,»3S,^2F,^3S 

.BYTE •2C,^33,*2e,^2A 

.BYTE •A2,^A6,^AA>Aa 

.BYTE •A8.^A8,*Aa,^A8 

.BYTE •Aa:*A8,*A7>AS 

.BYTE *A3.^A0,^A0 

.BYTE 68,81,0168,40,37.0,81 

.BYTE 68,60,37,0,37,0.37,0 

.BYTE 37,60,68:81,91,81,108 

.BYTE 96,0,0 

.BYTE 114,34,89,114,19,19,99 

.BYTE 14.14,14,19,0,18,0,18 

.BYTE 0, la, 19,19, I9, 19, 19,14 

.BYTE 14,127,80 



I The Same Display List 



I 

DLI8T 

nss 



.BYTE •70. •70, 006 
.WORD TLINE 
.BYTE •C? 
.HORD TOPLINE 
.BYTE »C7 
.WORD LLINE 
.BYTE •C? 
.WORD RLINE 
.BYTE •C? 
.WORD LLINE 
.BYTE ^07 
.WORD RLINE 
.BYTE •C? 
.WORD LLINE 
.BYTE »C7 
.WORD RLINE 
.BYTE »C7 
.WORD LLINE 
.BYTE ^07 
.WORD RLINE 
.BYTE •C7 
.WORD LLINE 
.BYTE ^07 
.WORD RLINE 
.BYTE »10,»46 
.WORD INFOLN 
.BYTE •06,^41 
.WORD DLIST 



I Title Screen Display List 

— .BYTE •70,07fl,^70,»70 

.BYTE •70. •70, 047 

.WORD SAME 

.BYTE 070,^17, •70, •70, ^46 

.WORD AUTHOR 



TDLIST 



I 

SAME 



AUTHOR 
COPYR 



.BYTE •70. •70,^46 

.WORD COPVR 

.BYTE •70.»06,»70,070,^36 

.WORD INSTR 

.BYTE •70,^70,»41 

.WORD TDLIST 

.SBYTE " ELEVATOR 
.SBYTE " REPAIRMAN 
.SBYTE "BY FRED CAPRILLI" 
.SBYTE " (C) 1983 
.SBYTE -ANALOa COMPUTINS' 
.SBYTE " press" 
.SBYTE " start 



I 

I MODIFIED CHARACTER SET 

CSETB .BYTE ^00, •00, *00, SOB 
.BYTE •00,^00,^00,000 
.BYTE •80, •80, •80, •80 
.BYTE •80, 080, 080, 080 
.BYTE 001, 001, SOI, 001 
.BYTE •01, •01, •01, 001 
.BYTE «B0:0FF,080,*FF 
.BYTE •S0,»FF,»80,»FF 

.BYTE •0i:*ff:^0i:0ff 

.BYTE •01;»FF,^01,»FF 
.BYTE •3C,«7E>7E,^E7 
.BYTE •E7,^FF,^FF,^FF 
.BYTE •08, •08,008, 008 
.BYTE •08, •08, 008, 008 



.WORD INIT 
.END 



.SBYTE " 

.SBYTE ♦•80, "000" 

.SBYTE " 
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• WIN AN ATARI DISK DRIVE • MORE FREE BONUSES • NEW LOWER PRICES 

WIN an Atari disk drive! Simply enclose a 3" by 5" with your printed name 
and address on ONE side AND on tlie OTHER side tell us in 25 words or 
less why you like LotsaBytes! The winner will be selected on the basis of 
originality, content, and clarity from all entries received postmarked on or 
before September 30, 1985. All entries will become the property of 
LotsaBytes. No purchase necessary. Void where prohibited by law. 



LotsaBytes offers QUALITY, QUANTITY, SELECTION, LOW PRICES , FREE 
BONUSES, and a FULL 100% REPLACEMENT GUARANTEE ON DEFECTIVE 
DISKS (including return postage). Our National Public Domain Copy Service 
searches the most popular magazines, B.B.S., and User Group libraries to save you 
TIME, WORK and MONEY. Most of our P.D. disks are double-sided, giving you more 
programming for less money. Our other software titles are discounted up to 50%and 
more. GIVE US A TRY AND BECOME ONE OF OUR THOUSANDS OF SATISFIED 
CUSTOMERS! 



PUBLIC DOMAIN SOFTWARE 



#1 
GAMES 

Two full disk 
sides packed with 

25 games 

including some 

Arcade'. 

$7.95 



#2 
UTILITIES 

25 Powerful 
programs to 
help you get the 
most out of your 
Atari. 

$7.95 



#3 
AMS MUSIC 

Listen to your 
Atari play the 25 
songs on these 2 
disk sides. Self 
contained with 
Player Pprogram 
$7.95 



#4 
GAMES 

14 better 

gamesfon two 

disk sides 

with some 

Arcade types. 

$7.95 



#5 
EDUCATION 

Loaded with 28 
programs on two 
disk sides. Fun 
learning for the 
entire family. 

$7.95 



#6 
AMS MUSIC 

25 more all-time 
favorites to sing 
along with on two 
disk sides. With 
Player Program. 
$7.95 



#7 
GAMES 

14 MORE better 

games on two 

sides. More 

Arcade types. 

$7.95 



# 8 

UTILITIES 

17 more power- 
packed programs 
to help unleash 
the full potential 
of your Atari. 
$7.95 



#9 
GAMES 

Filled on both 
sides with 17 of 
the better games 
around. Arcade 

type. 

$7.95 



#10 
UTILITIES 

Another 
assortment of 17 
programs that 

should be in 

everyone's library 

$7.95 



#11 
GAMES 

Two sides filled 

with 19 great 

games. Many 

Arcade types. 

$7.95 



#12 
ADVENTURES 

13 fantastic text 
type adventures 

for your 
enjoyment. Two 

sides. 

$7.95 



# 13 
EDUCATION 

24 entertaining 
and educational 
programs for 
the whole family. 
Two sides. 
$7.95 



#14 
AMS MUSIC 

The automatic 
Player lets you 
listen to another 
24 great songs 
on two sides. 
$7.95 



#15 
UTILITIES 

Another 
assortment of 21 
fine programs to 
'educate' your 

Atari. 

$7.95 



# 16 MUSIC MAJORI 

You can learn the basics of music with this 
fine program. Note recognition, key signatures, 
and note counting are among the many topics. 
For use by the individual or in the classroom. 
Originally $39.95 Send another $3.00 for a 
complete Student Guide. New! $7.95 



# 17 MICRO-TALES 

Written for the 4th or 5th grade levels, but 
children of ALL AGES will enjoy the action, 
sound, and music of the fine graphics and 
text. 'Turn the pages' and watch their eyes 
light up to THE NOISY GIANT and CAVEMAN 
JOE. Two sides. Ncw! $7.95 



SUPER STUD POKER 

by Walt Huber 
Now you can play hand after 
hand, against intelligent 
opponents with infinite patience 
and the only thing you'll lose is 
ignorance of the game. There are 
ten computer opponents of 
varying skills to choose from and 
YOU CAN PLAY EIGHT POPULAR 
STUD POKER GAMES, including 
Stud, Stud Lowball, Stud HiLo 
and Hi Chicago. A wild card can 
be added to the deck also. Anyone 
care for a friendly game of Poker? 
Joystick required. 
$29.95 value NCW! Only $12.95 



ORIGINAL ADVENTURE 

by Bob Howell 
For all Atari computers. The Original 
Colossal Cave Adventure faithfully 
reproduced from the 'main-frames' 
This is the one that launched the 
whole Adventure craze of today! 
' Two mazes 

■ 130 rooms 

• Deadly Dragons 
' Nasty Dwarves 

■ Tenacious Troll 

• The Pirate & More! _ 

■ 86 coded hints 9^^^/^ ^'' 

• SAVE/RESUME 

• 40k disk 
Originally $29.95 Only $14.95 




INSTEDIT 

The Atari Program Exchange (APX) called this "the 
best Character set editor we've seen". And no 
wonder! You can create special math and chemistry 
symbols, foreign language alphabets, or special 
typefaces. By positioning several characters 
together, you can even create hi-res pictures! 
Advanced users familiar with player missile 
graphics can even use it to design players. From 
beginner to expert, this is for you. Complete with a 
20 page manual. Joystick required. 

24.95 value LotsaBytes price $12.95 



Mew ! STAR LORDS by Wall Huber 
Until the 24th Century man was conlined to Earth, the solar system 
and a few nearby stars. Portals were predicted and soon discovered, 
allowing exploration of the Galaxy. Colonization proceeded rapidly, 
differences arose, wars were fought, and soon the Galaxy was on the 
eve of destruction. Peace came in the 27th Century. Disputes were 
decided by specially trained STAR LORDS commanding unmanned 
ships and robot satellites duelling in the far reaches of Space. 
Ultimate victory meant complete control of the Galaxy! You haveiust 
completed your training and your ability to command and control will 
determine the outcome of the conflict. (Text/graphics). (Complete 
instructions) 

$39.95 value LoluBy In price $ 1 4.95 



ESI WRITERI 

A quality WORD PROCESSOR that out-performs others 
costing over $100. It works with almost any printer and is 
the FASTEST WP you can buy. Features include a built in 
Help Screen, Justification, Search, Replace, Insert. Page 
Numbering, Headers, Centering and much more! It can 
load in other WP files, has friendly messages, and comes 
with over 50 pages of documentation and tutorials. Works 
with any Atari, but some configurations will require a 
translator disk. No printer drivers are required and you can 
use every feature of your printer Disk only. 



Originally $49.95 



LotHBylM pr*c« $19.95 



ST0NEQUE8T by David SIrelltz 
King Weesey and his subjects lived in 
great prosperity until the Evil 
Alchemist stole the GREAT STONE OF 
PR06PERITY and transported it to his 
Black Fortress. Unless someone 
I (you?) takes up the Quest and 
irecovers the STONE, King Weesey and 
'his subjects are doomed . . . You've 
come to the Castle to try to help, but it 
won't be easy. There are many traps, 
pitfalls, and puzzles to solve on the 
way. Almost everyone you meet will be 
an enemy and must be out-smarted (or 
bribed?). Magic Is everywhere and in 
many forms. Will you be strong 
enought to survive? (Text) 

$39.95 value 'Ncw! Only $14.95 



ADVANCED 
MUSICSYSTEM II 

by Lee Actor 
Allows you to compose 
and/or copy music 
with your Atari computer! 
All new machine code. 
' Control over pitch 
duration, envelope 
dynamic level, meter, 
tempo and key. 
' 4 independent voices 
' 5^/i octaves per voice 

■ Save up to 8200 notes 

■ Custom DOS 

■ FULL Instructions 
' 24K disk 




Originally $29.95 



Only $14.95 



BACK BY POPULAR DEMANDI THE ULTIMATE PROGRAMMING UTILITIESI 

Tricky TutorialtTM ■■ LOW ■• $ 7.95 each 

TRICKY TUTORIALSTM originally sold for up to $29.95 per copy. 
Each is written in an entertaining style and comes complete with disk and manual (up to 66 pages). 



- DISPLAY LISTS 

Learn to create your own graphics 
and text modes. 
•2 - SCROLLING 

Explains how to move the screen 
over maps of graphics or text. 
»3- PAGE FLIPPING 
Change the entire screen instantly to 
another display picture. 
•4-BEQINNINQ ANIIMATION 
Learn to create the illusion of 
movement using simple shapes. 
• 5 - PLAYER MISSILE 
GRAPHICS - Create your own 
'PACMAN' type game while learning 
about Collisions, Backgrounds. Play- 
ers, Scoring, and more. 
•e - SOUND li MUSIC 
Learn a simple way to write music 
and sound effects on your Atari. 
«7 - DISK UTILITIES 
Seven disi< tools. FORI^ATER, IN- 
SPECTOR, AUTORUN SVS IvIAKER, 
RPM CHECKER, MENU MAKER, 
DIRECTORY PRINTER & FILES 
TUTORIAL. 



M-CHARACTER GRAPHICS 

Change letter shapes into anything 
you wish. Includes an editor that 
makes creating and animating the 
shapes easy: and a linker that actually 
writes BASIC code. Complete game 
included as an example. 
«9 - QTIA GRAPHICS 
Use graphics modes 9 to 11 to create 
3-D shapes. Place 16 colors on the 
screen at once, and even digitize 
pictures using these new modes. 
Includes a 9 color picture editor. 
#10 - SOUND EFFEECT8 
30 simple sound effects like lasers 
and bombs, and an effects editor. 
Explains how to combine sounds 
and graphics, and 16 bit sounds for 
extended range. 

•11 - MEMORY MAP TUTORIAL 
How to control cursor text windows, 
user keys, joysticks and paddles, 
tabs, inverse video, upside down let- 
ters, break key protection, and 25 
more. 



*12 - S.A.M. TUTUORIAL 

Learn to make S.A.M. sing, change 
voice, sound, add graphics, explore 
phonemes, and ciiange inflection. 
Requires S.A.M. by Don't Ask. 
•13 - BASIC TOOLS 
Adds the following to BASIC: RE- 
NUMBER, DELETE, TRACE. EXPAND, 
OUICKREF, AND LISTER. 
•14 - ADVANCED PROGRAMMING 
TOOLS 

Machine language tools used to write 
commercial programs useable from 
Basicor Assembly. PLAYER MISSILE 
MOVEMENT, TIME DELAYS. SOUND 
EFFECTS, PAGEFLIPPING. MEMORY 
MOVEMENT, SPECIAL CHARACTER 
FONTS, and SAVE FULL GRAPHICS 
SCREENS (I/O) IN SECONDS. 
•15 - FANCY FONTS 
Includes many sample fonts, an 
editor, and adds a new set of sub- 
routines you can call to create great 
displays. Print the fonts out on your 
printer as you create them. 



Buy 1 to 5 at only $11.95 eech • 6 to 10 at only $9.95 each • 11 to 15 at only $7.95 each 



TERMS: All delective disks wilt be replaced free including return postage. Write first wttti details lor Return 

Authorization. All orders are shipped by U.S. Mail Add $1 .95 shipping end handling for 1 toSdisl(S.AddS2.95for 

6 to 10 disks. Add $3.95 lor 11 to 15 disks. Outside of U.S.A. S, Canada add 15% for shipping and handling 

(Minimum -$4.00) U.S. Funds ONL Y! California residents MUST add Sales Tax. We accept checks end money 

orders. Sorry, NO Credit Cerds or COD. Allow THREE weeks for personal chacks to clear our benk. SCHOOL 

AND GOVERNMENT PURCHASE ORDERS WELCOME! 

Sorry, no cetelog. We distribute end publish only what we advertise herein. 

We encourage software authors to submit their programs for evaluation. We pay competitive royalties on a 

monthly basis. 

Atari Is the registered trademark of Atari Corp. 



* * FREE BONUSES * * 
New Lucky 7 — 11 Bonuses 

Don't even ask how we can do it! We've decided to 
give even more free bonuses for larger purchases. 
FOR EACH 3 DISKS PURCHASED YOU MAY 
CHOOSE 1 FREE! BUT IF YOU BUY 7 DISKS, YOU 
NOW MAY CHOOSE 3 FREE BONUSES. AND IF 
YOU BUY 11 DISKS, YOU MAY CHOOSE 5 FREE 
BONUSES!. Here's a recap: For Each 3 disks you get 
ONEfree. Ifyou buy7,yougetoneextra(Buy7- get 
3). If you buy 11, add two extra (buy 11 - get 5). 
WOW!! 

Choose from the following: 

a. A XL/XE Translator disk to use most 800 software, 
(recomended!): or 

b. The new DOS 2.5 for 1 050 owners now using DOS 
3.0 (only); or 

c. Any of the LotsaBytes Public Domain disks #1 
thru #17. 



FREE BONUSES 



LotsaBytes 

15445 Ventura Blvd., Suite 10H 
Sherman Oaks, CA 91413 

CIRCLE #129 ON READER SERVICE CARD 



16K Cassette or 
24K Disk 



EDUCATION 





NUMBER 




CATCH 



by David L. Clark 



Mad Mordred the Magician is making numbers fall 
from above. In Number Catch, you must guide your 
players to retrieve these falling numbers. Each time 
one reaches the ground, you lose a catcher. 

To stop you from intercepting the numbers. Mad 
Mordred has sent bombs, explosive spiders and radio- 
active bats. He's also cast a spell that causes some 
of the dropping digits to change into bombs, spiders 
and bats. If one of them hits or catches a catcher, that 
catcher is destroyed. 

For every four numbers caught, a math problem is 
presented to be solved. You solve it by catching the 
correct answer as it falls from above. If the correct 
answer is not snared after seven numbers have fallen. 



it will be given. For each problem correctly solved, 
100 points are earned. You're not penalized for in- 
correct or unanswered problems. 

Additional points are earned by catching the fall- 
ing numbers and successfully completing the game 
without losing all your catchers. Each number caught 
is worth 10 points. A bonus of 200 points is earned 
for each catcher remaining at the end of the game. 

Number Catch ends after all catchers have been 
lost or after forty-two numbers (excluding answers) 
have been caught. 

The type of arithmetic problem presented is based 
on which of five options is chosen at the beginning 
of play. The options include: addition and subtrac- 
tion; addition, subtration and multiplication; addi- 
tion only; subtraction only; or multiplication only. 
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A Number Catch continued 



Program breakdown. 

Lines Description 

100-140 Main loop. 

150-160 Player movement. 

170-190 Number change to bomb, spider 
or bat. 

200-250 Missed; lose a player if number. 

300-350 Caught number. 

360-380 Bonus routine if game complete. 

400-410 Score routine. 

500-597 Bomb, spider and bat routines. 

600-630 Game over routine. 

650-670 Screen setup. 

700-780 Sound routines. 

800-895 Arithmetic problem routine. 

900-982 Title screen and option selection. 

990-995 Initial value setup. 

1000-1180 Game initialization. Set up char- 
acter set, player/missile graphics. 

David L. Clark, father of four, is a clinical phar- 
macist. He has been an Atari owner for two years, 
but began programming in Fortran IV and APL on 
IBM machines years ago. He enjoys writing games, 
educational and business applications programs. 

Listing 1. 
BASIC listing. 

18 REH »JHHHI MUHBER CftTCH «iHHf 

15 REN «« by David L. Clark ** 

28 GOTO 998 

188 FOR LOOP=C TO D 5TEP C:POKE 77,C:I 

F RAN=C AND INT CRND CC)«Q)>H THEN GOTO 

588+HC«INTIRNDCC)«H) 

184 IF RAN=D THEN CT=CT+D : J=WAL CCTS CCT 

,CT}} :A=PCJ] :C5=STRS(AN5CJ)) :G05UB H:G 

OTO DFC+BCR»tCT>5J 

118 G=INT (RND CC)«12) : C$=5TR$ CINT CRND tC 

J*13)) :A=INTfRNDtC}«HC1-Q) :G05UB M 

120 POKE CR,C:P0SITI0N A,K:? C$:FOR 1= 

TO FF:G05UB H:50UND C,DFC+I«5,U,V:P0 

SITION A.I-D:? A$ 

125 IF G>T AND I=V+K*fG=U) THEN 178 

130 POSITION A, I:? C$:G0SUB N:IF PEEKt 

HITR}<>C THEN 388 

148 NEXT I: ON LOOK+D GOTO 288,258,585 

158 ST=5TICKCCJ:IF ST>12 THEN FOR M=C 

TO KiNEKT H: RETURN 

168 B=CB=D)«F+CB=F) :POKE PB, A CB) :X=}<+H 

»CC5T<T AND X<178J-C5T>T AND X>57)}:P0 

KE PL X: RETURN 

178 l60I(=G-5:C$=CHR$CD} :F0R CNT=C TO H 

CSSOUND C,CNT,C,15:NEXT CNT:50UND C,C, 

C,C:G05UB M:IF G=U THEN G=C:GOTO 130 

180 IF G=U THEN G=C : J=D:C$=T$ CK,Q) .-FOR 

1=1 TO FF:J=D«CJ=F>*F«fJ=D}s60T0 532 
190 6=C : J=H : D J=F : CS=T$ CR , 11> : A=A-D : POS 
ITION A, I:? C$CJ,J+D) :GOTO 582 
288 FOR I=A TO 35:P05ITI0N I,FF:? C5:5 
OUND C, I, V,V: POSITION I-D,FF:? A$:SOUN 
D C,C,C,C:G05UB HiNEXT I 
218 COSUB PING: POSITION 35, FF:? A$ 
228 GOSUB 758: FOR 1=141 TO 152: SOUND C 
,I,U,U:NEXT I:SOUND C,C,C,C 



238 POSITION 39-CATCH,F:? " ":CATCH=CA 
TCH-D:IF CATCH=C THEN POKE CCR,HT:GOTO 

BI 
235 IF LOOK>D THEN POKE PL, X: POKE CCR, 
38:L00K=C 
240 NEXT LOOP 

258 POSITION A,FF:? AS: POSITION A,K:? 
C$: GOSUB PING: NEXT LOOP 
388 POKE CR,C: POSITION A, I:? A$:IF RAN 
=D THEN GOTO 838l^FC«CANS=VALfCSI) 
318 IF LOOK>D THEN CNT=-1:G0T0 585 
338 GOSUB PING:XX=XX+D-K«fXX>H3:IF XX> 
F THEN NCXX-F)=VALCC$) 

348 COT=COT+D: GOSUB SCR: IF XX=K THEN G 
OSUB 888 

358 IF C0T<42 THEN NEXT LOOP 
360 POSITION 13,T:? "YOU HADE IT!": POS 
ITION T,ll:? "You receive a BONUS of " 
* :BON=C 

378 FOR H=D TO CATCH :B0N=B0N+288: POSIT 
ION 31,11:? BON: GOSUB PING: FOR J=D TO 
FF: GOSUB SCR: NEXT J: NEXT H 
388 FOR H=C TO SCR: NEXT H:GOTO BI 
488 SC=SC+ADD : SCS=STRS CSC) : LOC=D 

418 for i=d to len f scsi : sound g,168-i« 

fc,v,12:position loc+i,f:? sc$ci,i):so 

UND c,c,c,c:next I:RETURN 

580 FOR I=C TO HC:SOUND C,I,C,15:NEXT 

I:A=INTfX/XC-XB) :SOUND C,C,C,C:cl=CHRS 

CD):LQOK=F:GOTO DFC 

585 CS=T$CD,H) :F8R I=D 18 H:SOUND C,15 

8,T,16-I*H:P0SITI0N A,FF:? CSCI,I3:IF 

CNT=-1 THEN POKE CCR, PEEK CFCJ 

518 FOR J=D TO U:NEXT J: NEXT I:POSITIO 

N A,FF:? A5:SDUND C,C,C,C:IF CNT=-1 TH 

EN POKE 704, BK:CNT=D: GOTO 228 

515 LOOK=C:NEXT LOOP 

538 J=D : C$=TI (K , Q) : L80K=H : A=INT f X/XC-X 

B):gosub h:position a,k:? cSfj,j):POKE 

CR,C:FOR I=Q TO FF: J=D»CJ=FJ+FKCJ=DJ 
532 GOSUB M:SOUND C,FC+I»S,V, V:POSITIO 
N A,I-D:? A$:A=A+CX/XC>A+XB)-fX/XC<A+X 
B3 

535 POSITION A, I:? C$ <J, J) :GOSUB M:IF 
PEEKCHITRIOC THEN 300 

548 next i:cnt=d:g0t0 585 

568 j=h:dj=f:i=k;cS=tScr,ii3 :look=k:a= 

19:G0SUB M:P0SITI0N a, I:? CSCJ,J+11:P0 

KE CR C 

562 E=INTCRNDCC}«R) 

564 DJ=DJ+K»CJ=Dl-K»tJ=Q> :J=J+DJ: GOSUB 

H:SOUND C,FC+I«T,V,U: SOUND C,80+I»T,V 
,V:IF E>I/U THEN 575 

578 POSITION A,I:? AS : A=A+ CX/XC>A+XB]- 
CX/XC<A^XB) :P0SITI0N A, I:? CStJ,J+DJ:G 
OTO 598 

575 POSITION A, I:? AS :I=I+D : A=A* (X/XC> 
g+XBJ-CX/XC<A+XBJ 

588 IF I>21 THEN FOR I=D TO 58: SOUND C 
,5e+K»I,IHF,V:NEXT I:SOUND C,C,C,C:LOO 
K=C:NEXT LOOP 

585 POSITION A, I:? CSCJ,J+DJ 
590 GOSUB H:IF PEEKCHITR}=C THEN SOUND 

C,C,C,C:GOTO 562 
595 FOR M=D TO V:FOR J=D TO 0:FOR L=D 
TO H: SOUND C,J»W+L«F,V,J*L:NEXT L:HEXT 

J: POKE CCR, PEEK fFC) : NEXT N 
597 POKE CR,C:POSITION A, I:? AS:POKE C 
CR,BK:SOUND C,C,C,C:GOTO 228 
680 IF SOHISCORE THEN HISCORE=SC :SCS= 
SIRS (HISCORE) : L0C=19-INT « f LEN CSCSJ +8 . 5 
}/F) : GOSUB SCR+U 

610 POSITION 13, T:? " «GAME OVER«":POK 
E BTN,T: POSITION S,ll:? "Another Gane? 
Press START ":POKE PB-11,C 

628 GOSUB BCR:GOTO 950 

658 POKE CUR. D: POSITION D.H;? "^^1— 
■■■■■■■■■■■■■■■■■rTPOSIT 
ION D,D:? "SCORE" 
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660 POSITION 31, D:? "CftTCHERS" :FOR I=D 
TO CATCH: POSITION 39-I,F:? CHR$CC):NE 
KT I 

670 POSITION 15,D:? "HIGH SCORE" :SC$=:S 
TR$ CHISC0RE3 : L0C=19-INT C CLEN CSC$} +0 . 5) 
/FJ: POSITION LOC+D,F:? HISCORE : RETURN 
700 FOR 1=15 TO C STEP -1: SOUND C,4e,U 
,I:FOR J=C TO H:NEXT J: NEXT I: SOUND C, 
C C C: RETURN 

710 'CNT=24: RESTORE 760: FOR I=D TO HC:R 
EAD SA,SB:SOUND C,Sa,V,T:FOR J=D TO SB 
«CNT 

728 NEMT J:ST=INTfRNDCC)»Q+R} :GOSUB 16 
8:S0UND C,C,C,C:IF PEEKCBTNlOR THEN N 
EXT I: POKE CCR, PEEK CFCl: GOTO 710 
730 POKE PL, 228: POKE PB-11, 255: RETURN 
740 CNT=15: RESTORE 770: FOR I=D TO R:RE 
AD SA,SB:SOUND C,SA,V,T:FOR J=D TO SB« 
CNT:NEHT J:SOUND C,C,C,C 
745 NEXT I: RETURN 

758 CNT=HC: RESTORE 788: FOR I=D TO K:RE 
AD SA,SB:S8UND C,SA,V,T:F0R J=D TO SB« 

cnt:next j:sound c,c,c,c 
755 next i: return 

768 DATA 68,1,60,1,68,2,81,2,47,1,47,1 
,47,2,68,2,68,1,47,1,40,3,48,1,45,1,47 
,1,53,4,53,1,47,1,45,2,45,2,47,1 
765 DATA 53,1,47,2,68,2,68,1,47,1,53,2 
,81,2,64,1,53,1,68,4 

778 DATA 121,2,188,2,96,2,81,3,96,2,81 
.4 

788 DATA 243,2,217,1,204,2,243,4 
888 TYPE=INTCRNDCC>«C0PT+D1+D>:IF 0PT> 
F THEN TVPE=OPT-F 

818 GOSUB 875+TYPE«Q:F0R I=D TO F:POSI 
TION 14,1:? B$:NEXT I: J=INTCRNDfC]«Q} : 
IF J>ANS THEN J=ANS 

815 FOR I=D TO Q: ANSCIJ=ANS-J+I-D;NEXT 
I:FOR I=D TO K:J=INTfRNDCCJ«Q+D> :M=IN 
TfRND(C)«Q+D) :ANSCR)=ANSCJ) 
818 CT5tR,RJ=CTSCJ,JJ ;CT$f J, J>=CT$CM,M 
) :CT$CM,H)=CTt(R,R) 

828 ANS(J}=ANSCH):ANSCIO=ANSCR}:NEXT I 
: POSITION 13,f:? ncu ;TPS;NIF> ;" = ?": 
ct=c:ran=d:look=d 
825 ct$cr,tj=ct$cd,hj ;f0r i=d to q:pos 

ITION PCI},K:? ANS til: next I:G0SU8 748 
:GOTO 188 

838 GOSUB 758:P0SITI0N U,R:? "THE CORR 
ECT answr IS": position 19-INTCLENCC$> 
/F>,T:? ANS 

848 FOR I=D TO SCR: NEXT I: POSITION U,R 
:? B$;B$:POSITION 15, T:? B$:GOSUB 895: 
GOSUB 670: NEXT LOOP 

858 POSITION V,S:? "THAT'S CORRECT!!!! 
":POKE 19, C: POKE FCC 

855 POKE BCR, PEEK CFCl: SOUND CPEEKCFC) 
,V,V:IF NOT PEEKC19} THEN 855 
868 SOUND C,C,C,C:POKE BCR,BK:FOR H=D 
TO V: GOSUB SCR: NEXT H: GOSUB 895:P0SITI 
ON V,S:? B$;B$: GOSUB 678:6010 188 
888 ANS=NfD)+N(FJ:TP$=" ♦ ": RETURN 
885 IF NCF)>NfD) THEN NCH)=NCD) :NCD)=N 
CF):NCF]=NCH} 

887 ANS=NtD>-NtF> :TP$=" - ": RETURN 
898 ANS=NCD)«NCF} :TP:$=" X ": RETURN 
895 POSITION 13,F:? B$:FOR I=D TO «:P0 
SITION PCI},K:? AS: NEXT I :RAN=C : LOOK=C 
* CT=C * RETURN 

988 GRAPHICS C:POKE BCR,64:P0KE 712,64 
:FOR I=C TO U: POSITION 13,1:? "NUMBER 
CATCH": SOUND C,DFC+I»V, W,M 
918 POKE CUR,D:F0R J=D to 15:NEXT J:IF 
I<U THEN POSITION 13,1:? " 

928 NEXT I: GOSUB PING: POSITION 11,12:? 
"by David L. Clark" :GOSUB PING 



938 POSITION R,15;? "Press start butto 
n when ready": POKE btn,t:poke ccr,bk 

948 POKE PB-11, C: POKE 53277, H: POKE 532 
56,D:P0KE 623,T:P0KE 559,62:G0SUB BCR 
950 GRAPHICS 6: POKE BCR,C :OPT=D:POSITI 
ON a,C:? tte; "OPTIONS": POSITION D,H:? tt 
R;"l. plus C+} and" 

955 POSITION K,K:? ttR;"Hxnus t->":POSI 
TION D,R:? ttR;"2. plus C+),": POSITION 
K,s:? ttR; "Minus c-> , and" 
960 POSITION K,T:? ttR;"tiHes CX}":POSI 
TION D,V:? ttR;^'3. plus C+]":POSITION D 
,12:? I»R;"4. Minus C-J" 
965 POSITION D,14:? »R;"5. tiMes CXJ": 
POSITION D,16:? ll6;'ia gnriaB - ";0PT:P0KE 
CUR, D: POKE BTN,T 

970 ? " Press RETURN to Change opti 

on":? " Press START to begin": POKE 

BTN,T 

975 IF PEEKC764)=12 THEN OPT=OPT+D«COP 

T<Q)-K«COPT>K):POSITION U,16:? ttR;OPT: 

GOSUB PING: POKE 764,255 

988 IF PEEKCBTN)<>R THEN 975 

982 X=DFC:GOTO 1828 

998 C=e:D=l:F=2:HISC0RE=:C:DN=C:DIH Af2 

} , SC$ C83 , TP$ C3) , C$ f 6} , N C3} , ANS C6} , P C5} 

, BS C14) , A$ €3} , BT$ CBS) , CT$ C8} , T$ (11} 

995 XC=123/28 : XB=57/XC-5 : H=3 : K=4 : 0=5 : R 

=6 : s=7 : T=8 : u=9 : u=i8 : HT=38 : FC=2e : ff=22 : 

HC=38 : DFC=128 : SCR=488 : BI=688 : BCR=7ie 

997 CUR=752 : CCR=784 : HITR=53252 : BTN=532 

79 : ADD=18 : CTS="12345" 

1888 RESTORE 1868: FOR I=D TO 32: READ A 

:BT$CI,II=CHR$(A) :NEXT I: FOR I=D TO 11 

: TS (1 , 13 =CHR$ CI+D) : NEXT I 

1018 PING=78e : H=15e : X=DFC : RI1=57344 : PL= 

53248 

1820 xx=c : B=D : sc=c : catch=o : a (D) =72 : a cf 

1 =18 : COT=C : RAN=C : P (D) =0 : P CF3 =12 : P (H) =1 

9 : P CK) =25 : P CQ) =32 : LOOK=C 

1830 CNT=C:BS=" ":A$=" 

" : BK=114 : CR=53278 

1858 IF DN>C THEN GRAPHICS C: RESTORE 1 

198: GOTO 1140 

1868 DATA 184,184,133,213,184,133,212, 

184,133,215,184,133,214,162,4,168,8,17 

7,212,145,214,288,288,249,238,213,238 

1878 DATA 215,202,208,240,96 

1108 POKE 559, C: GRAPHICS 24: GRAPHICS C 

: P=PEEK (1063 -16 : PHB=PK256+1824 : CHB=Pie 

«^ie24 

1118 POKE 106,P:P0KE 54279, P: GRAPHICS 

C:PB=PM84^2B1 



|^v/^*^*V|Vi^Now You Can Make Your ATARI 



]- 



W^^^ SPEAK! 



'/V^'^.A^*^ 



• Build your own VOICEBOX • unlimited vocabulary 

• Uses Allophone based speech processor 

• All Radio Shack parts • For beginners and experts 

• No internal modifications to computer required 

• Plugs into gameports #1 and #2 

• Can be used on all ATARI computers 

• For instructions, parts list and sample program, 
send $7.00 check or money order to: 

RAK, P.O. BOX 452, STANDARD, CA 95373 
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Number Catch continued 



1128 RESTORE 1188: FOR I=PHB+198 TO PIB 

+281: READ A:PeKE I, A: NEXT I: POKE PL, 22 

8 

1138 Z=U5R f ADR CBT$) , RH, CHBJ : DN=D : GOTO 

588 

1148 FOR I=D TO 184: READ A: POKE CHB+51 

1+I,A:NEXT I:POKE 756, CHB/256: POKE 532 

77, H: POKE 53256, D: POKE 623, T 

1158 POKE BCR,BK:POKE 712, BK: POKE 559, 

62:GQSUB 658: POKE CCR,HT:POKE PL,X:P05 

ITIOM 11, T;? ••*** GET READY »**" 

1168 GOSUB 748:F0R I=D TO 288:NEXT I:P 

05ITI0N 11, T:? B$:B$:GOTO 188 

1188 DATA 255,66,98,98,126,24,24,24,36 

f 36 ji 36 y 36 

1198 DATA 24,24,255,24,24,68,182,182,8 

,66,126,126,126,126,68,24,66,126,126,1 

82,182,126,126,68,255,255,195,195,195 

1288 DATA 195,255,255,255,129,129,129, 

129,129,129,255,36,126,126,82,82,148,1 

64,168,36,126,126,74,74,41,37,21,96 

1218 DATA 58,25,15,7,1,8,8,6,76,152,24 

8,224,128,8,8,8,2,1,255,3,1,8,8,8,64,1 

28,255,192,128,8,8,8,2,1,7,15,25,48 

1228 DATA 96,8,64,128,224,248,152,12,6 



CHECKSUM DATA. 

(see page 30) 



18 DATA 638,368,463,266,394,913,314,32 
4,386,872,828,535,671,267,239,7462 
288 DATA 414,854,387,519,295,224,487,9 
24 , 624 ,978,475,35, 668 , 731 , 691 , 8218 
488 DATA 186,994,271,185,538,917,335,1 
54,879,785,462,678,314,319,238,7167 
588 DATA 548,865,547,912,619,153,746,2 
25,543,463,743,444,497,444,984,8733 
748 DATA 429,763,463,766,953,275,566,5 
88 , 699 , 459 , 768 , 867 , 7 , 942 , 467 , 8924 
848 DATA 465,585,675,655,357,186,372,4 
48,738,36,437,755,739,464,774,7686 

i?M5ys4i?ii??j*i?g4j??fifg*irii!i''' 

1868 DATA 336,293,15,231,623,212,698,3 
87,484,975,484,446,132,45,5121 



National 
1-800-328-1226 

Ask for computer sales 
(orders only) 



SPECIALS 



Pac Man, Star Raiders & pr Atari Joysticks 30.00 

Pac Man or Star Raiders 1 0.00 

1030 Modem 70.00 

Sparta Dos 30,00 

Atariwrlter 40.00 

BMC BM12EUY 12" High Res Amber 60.00 

US Doubler from ICD (includes Sparta Dos) 60,00 

51/4"SS/DD Disk W/Sleeves (25 Pack) 25,00 

Kraft Single Button Joystick 8,95 

Kraft Switch Hitter Joystick 9.95 

MPP 1000E Modem 100 00 

Atari 5200 Joysticks 20.95 

Atari Paddles 14.95 



ORDER TOLL FREE 

Hrs. M-F 10:00-5:30 (CST) 



ORDERING INFORMATION... 

To order, call loll free or send by mail. For faster service use 
your Visa, Master Card or American Express (include card # 
and expiration date), or send a money order or cashiers check. 
Prices shown reflect a 4% discount lor cash. Add 4% for credit 
card orders. Allow 2 weeks lor personal checks to clear Add 
3% (minimum 3.50) for shipping. Minnesota residents add 6% 
sales tax. We also ship COD. Return policy: Call Customer 
Service # for RA #. Credit or defective exchange only 




Minnesota 

1-800-626-2345 

Ask for computer sales 
(orders only) 



PRINTERS 



BMC BX80 (80 cps. Friction or Tractor Feed. 

Epson Compatible) 209.95 

Epson LX80 21 9.95 

Epson LX80 Tractor Feed Option 35.00 

Epson FX80 t 349.45 

Epson FX 100 + 539.95 

Epson MX.'RX. FX80 Ribbons 5.95 

BMC BX80 Ribbon 7.95 

Cardco AT Printer Interface 50.00 

Atari 850 Interface 1 29.95 



i _LOOK 



We carry all Atari hardware... 
Call for prices. 

All software for your Atari is 
available at 25% off suggested 
retail prices. 



Customer Service 61 2-784-681 6 

CIRCLE #113 ON READER SERVICE CARD 



r5 T A ^%^ Q A I IT C 8465 Plaza Blvd. 

Va IMoV^o^ OMLCO Minneaoolis. MN 



Minneapolis, MN 55432 



CIRCLE #131 ON READER SERVICE CARD 
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The 

Summer CES 

Parts. 

what's new in hardware and software 



by Arthur Leyenberger and Lee Pappas 

As mentioned in last month's ANA- 
LOG Computing, Atari had the hit of the 
Consumer Electronics Show with their 
CD-ROM player. Their other products, 
the 260STD and inexpensive modems, 
were also well received. 

This month, we wrap up CES cover- 
age by reporting on other new products 
from companies exhibiting at the semi- 
annual electronics show. 

Activision had several new programs 
for the Atari. Garry Kitchen's Gamemak- 
er: The Computer Game Design Kit is 
a programming tool for the creation of 
your own games. Using only a joystick, 
you select from various menus to choose 
the different aspects of a game you wish 
to create. Pre-programmed characters 
such as an airplane, rocket ship, flying 
saucer, ducks and a running man are in- 
cluded. 

The program lets you select the speed 
of movement and direction of characters, 
plus background scenes, sound effects 
and even music, Gamemaker also lets 
you save your game creations on a sep- 
arate disk, so that you can give them to 
your friends. Saved games don't require 
the Design Kit in order to run. 

Another new Activision game is Fast 
Tracks: The Computer Slot Car Con- 
struction Kit. Another do-it-yourself 
program, this lets you create, edit and 
save slot car tracks, then race on them. 



The program is joystick controlled, 
and you select from a menu of track sec- 
tions such as curves, loops and under- 
passes in order to assemble your track 
piece by piece. The track difficulty lev- 
el and the slot car itself can be custom 
designed however you want. Fast Tracks 
also includes several predesigned race 
courses to get you up and racing im- 
mediately. 

Hacker is the third Activision game 
that was shown at CES. Much like a 
mystery movie. Hacker has no instruc- 
tions, goal or guidelines. You simply 
boot the disk, and the program asks you 
to log on. What you do after that is to- 
tally up to you. 

All you know when you begin the 
game is that you have "accidentally" 
broken into an unknown computer sys- 
tem and have stumbled onto a secret be- 
yond anything you could imagine. With 
no rules, clues or background informa- 
tion, you must find out whose system 
you've logged onto and what's going on. 
All Activision will say about Hacker is 
that there is a mystery to be solved and 
there may be several solutions to the 
problem. 

Alter Ego is Activision's game made 
for wimps. The prograin allows the play- 
er to vicariously experience living some- 
one else's life. As you're presented with 
situations and events, you can respond 
in any way you want . . . and see how 
that behavior molds your personality. 



With Alter Ego, you can consider dif- 
ferent ways you might live, . .in an en- 
tertaining and totally risk free manner. 
After each decision is made and entered , 
the computer narrator explains the out- 
come and the possible consequences of 
that choice. Over time, the effects of 
choices made early in life will affect the 
situations you later face. 

Gamemaker, Fast Tracks and Alter 
Ego will be available by the end of the 
year and each cost under $.50. 

Batteries Included, the Canadian firm 
responsible for two good programs. Pa- 
per Clip and HomePak. was showing a 
new 80-column cartridge for the 8-bit 
Atai'i computers. The BI-80 will work on 
the XL and XE machines, and plugs into 
the cartridge slot. It's priced at about $80 
and will work with the new versions of 
Paper Clip and HomePak due out this 
fall. 

Batteries Included amiounced that 
they would send a free BI-8() cartridge 
to any legitimate software developer, 
complete with specifications. This open- 
minded attitude is refreshing in the in- 
dustry and may yield a significant num- 
ber of programs that will work with the 
product. A standard may be created in 
the Atari 8-bit line, which is fine with 
me. It would also be fine with Batteries 
Included. 

Broderbund Software had only a few 
Atari-related amrouncements. Champi- 
onship Lode Runner will become avail- 
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able for the Atari computers this fall. 
Also, their ne\A' game, Karetaka, will be 
available for the Atari. 

Karetaka is imique in that it's the first 
and only game that I kno'w of using film- 
style cutaway views for game screens. 
When approaching an enemy, for exam- 
ple, the screen first shows your player, 
then it cuts to a view of the opponent 
approaching, then back to you again. It's 
an effective technique in this karate- 
combat-adventure game. 

Another new game shown by Broder- 
bund was Lode Runner's Rescue. This 
follows in the footsteps of Lode Runner, 
in that yoiu' character must traverse a se- 
ries of forty-six mazes on the way to the 
goal. 

You are Alexandra, the daughter of the 
famous Lode Runner, trying lo reach 
your father's prison cell. Naturally, you 
must pick up keys and avoid the hostile 
guards on your journey. 

Rescue features a game editor so that 
you can create 3'our own screens, with 
elevators, trap doors, enemy guards and 
rushing rivers. Lode Runner's Rescue 
will be available for the Atari this fall at 
$30. 

Broderbund also announced the Print 
Shop Graphics Library Disk Two. This 
$25 disk, coming in the fall, provides 
120 additional designs, symbols and pic- 
tures for your Print Shop graphic cre- 
ations. 

Images in six new categories consist 
of such items as a tractor, jukebox, mi- 
croscope, whale and cross. The Print 
Shop lets you easily write, design and 
print your own greeting cards, letter- 
heads, banners and signs. 

Computer Magic was showing an in- 
teresting product that will appeal to ro- 
bot lovers of all ages. Called Robot Link, 
it runs on any Atari 8-bit computer and 
lets you control Tomy Omnibot and Ver- 
bot robots. 

This software is unusual, in that you 
don't need to actually walk the robot 
through its series of steps to train it to 
do something. Various sequences can be 
saved to disk and later reloaded. 

The software package also comes with 
several games that take advantage of the 
program's unique ability to make one of 
the Tomy robots move in a random fash- 
ion. In addition, for approximately $40, 
Robot Link allows you to have more pre- 
cise control over the maneuverability of 
yovir robot. 

A small Oregon company named Co- 
vox had an interesting product at the 




Leonard Tramiel showing the myriad software titles available for the Atari XEs. 



show. They were exhibiting a voice rec- 
ognition and voice synthesis unit for Ap- 
ple, Commodore and Atari computers. 

Called the Voice Master, it lets you 
record words in any language, using 
your own pitch and accent, and later 
have the program recognize and speak 
the words. 

Included in its $90 price is another 
program. Voice Harp. This allows you 
to perform, compose and write music, 
simply by hmnniing or whistling into the 



microphone. Seeing (and hearing) it in 
action is truly uncanny. 

The Voice Harp lets you produce var- 
ious tone qualities, different keys and 
multi-note harmonies. You can even see 
the notes scrolling on the screen's mu- 
sical staff as you hum or whistle. 

The results of your composition can 
be edited, saved and even printed. I look 
forward to obtaining a Voice Master in 
the near future, in order to do a full-scale 
review. 
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Datasoft was displaying something 
old, something new and something bor- 
rowed. The borrowed titles shown were 
licensed originals from other compa- 
nies. From Atari, Datasoft is now mar- 
keting Pole Position, PacMan and Dig 
Dug. They're also marketing Zaxxon 
from Sega. 

In the something old category. Data- 
soft continues to sell the Conan, Man- 
copter and Bruce Lee games. 

For something new, they amiounced 
several games for the Atari. Mr. Do and 
Pole Position II have been around for a 
while, but are now making their debut 
on Atari machines. Mr. Do is similar to 
the popular arcade game. Pole Position 
II is also an arcade translation, complete 
with four tracks and the abiUty to cre- 
ate your own track. 

Another acquired arcade license is 
Elevator Action by Taito. Elevator Action 
and Pole Position II will be out in the 
fall and will retail for about $30. 

Three entirely new games were pre- 
viewed by Datasoft. Zorro, based on the 
famous character created by Johnston 
McCulley in 1919, has appeared in the 
movies, on TV and in comics. Now the 
computer game arrives with the villain 
we all love to hate; Sergeant Garcia. 

The game begins with the abduction 
of a fair maiden by Garcia's soldiers. Zor- 
ro's pursuit takes him through fifteen in- 
creasingly difficult screens, including 
four in the catacombs beneath the mis- 
sion graveyard. As Zorro, you leap from 
rooftops, trampoline your way from one 
floor to another and engage Garcia and 
his soldiers in duels. 

Another new title from Datasoft ties 
in with the new Spielberg-produced 
film, The Goonies. Following the adven- 
tures of the Goonies kids, each screen 
is an elaborate Rube Goldberg maze. 
Your goal is to obtain the pirate's treas- 
ure and avoid the evil Mama Fratelli. 

I3atasoft's third new game is called 
Alternate Reality. It's a fantasy role- 
playing game in which you've been ab- 
ducted by an alien spacecraft and trans- 
ported to another time and place. 

In the first episode, "the city," you 
must learn basic survival skills — finding 
food, shelter and money. The goal: re- 
turn to Eai'th or seek revenge on your ab- 
ductors. 

Zorro, The Goonies and Alternate 
Reality will be available for the Atari 
computers this fall. Alternate Reality 
will sell for $40, while Goonies and Zor- 
ro will retail for $30. Datasoft hasn't 



been very strong in the Atari market 
lately, but we wish them success with 
their line of highly recognizable titles. 

Electronic Arts was not at the show, 
but had a hotel suite in downtown Chi- 
cago. They were showing nothing new 
for the Atai'i at this time, but told me that 
Skyfox, Adventure Construction Set 
and Road Racing Destruction Set will 
probably be available for the Atari 8-bit 
computers by the end of the year. 

They have purchased the rights to the 
arcade hit Marble Madness and men- 
tioned that a version may appear for the 
ST computers. Also, an enhanced Finan- 
cial Cookbook may become their first ST 
product. 

Epyx Software, the folks who brought 
you the two great Lucaslilm games Res- 
cue on Fractalus and Ballblazer, were 
proudly showing two additional Lucas- 
film entries. 

Eidolon allows you to become an ad- 
venturer on a magical journey. In a kind 
of inverted Fractalus, you roam through 
caverns populated by trolls, greps and 
dragons. Your goal is to find the inven- 
tor of a nineteenth centui-y time machine 
and learn the secrets of its use. 

The other new Lucasfilm game is Ko- 
ronis Rift. This is really a strategy game 
in action game's clothing. You play the 
role of a futuristic teclino-scavenger who 
discovers the Koronis Rift: the legen- 
dary weapons testing gromids for an an- 
cient race of beings. 

Unfortunately for you, this neat tech- 
nology is guarded by a genetically engi- 
neered race of creatures who've outlived 
their creators. It's up to you to decide 
what weapons and technology to recover 
in order to survive. 

Both Eidolon and Rift employ Lucas- 
film's fractal generators to create ever- 
changing 3-D landscapes and caverns. 
These techniques appear to be even bet- 
ter than those used on the first two Lu- 
casfilm games. Explosions look more 
realistic, objects seem lighter in the dis- 
tance, and more colorful objects appear 
on the screen. The games will be avail- 
able in the fall, sellijig for about $30. 

Latest in the series of sports games 
from Epyx is the World's Greatest Foot- 
ball Game. As a computer coach, you 
can play against the computer or another 
opponent with up to 120 different plays, 
choosing either offense or defense. The 
game will sell for about $30 and should 
be out by the time you read this. 

Epyx also amiounced that a new, en- 
lianced version of Temple of Apshai will 



be available for the Atari computer soon. 
Called the Trilogy, this D&D adventure 
role-playing game features 1400 sepai'ate 
chambers, multiple dungeon levels, im- 
proved graphics and faster action play. 
It will cost $30 and includes the origi- 
nal Temple of Apshai, Curse of Ra and 
Upper Reaches of Apshai. 

A company called Enhanced Technol- 
ogy Associates was demonstrating some 
interesting products in the back of the 
Atari booth. They have one called Vir- 
tuoso that allows you to create and edit 
sounds on the Atari computer. 

What's unique about their program is 
that you don't need to read music in or- 
der to use it effectively. The program is 
primarily joystick controlled, and you 
simply draw the melody on the screen. 
Once this is done, note names can be 
displayed, timing changed, and sections 
cut and pasted for future use. 

Virtuoso requires an Atari 130XE and 
will sell for mider $50. It will be avail- 
able by the time you read this. 

A second ETA product is Virtuoso 
MIDI. This is a two-part product: an en- 
hancement to the original Virtuoso pro- 
gram and a hardware interface. 

The company says that existing own- 
ers of Virtuoso can upgrade to the new 
product for the difference in price. ETA's 
MIDI interface will sell for under $150, 
and the program will cost $50. The Vir- 
tuoso MIDI requires an Atari 130XE and 
will be out in )anuary. 

Joseph Lyons, one of the ETA pai-tners, 
told me that they'll also be coming out 
with Virtuoso MIDI for the Atari STs by 
summer, 1986. Few details are available 
now, but they're committed to support- 
ing the ST. 

ICD, the makers of SpartaDOS, were 
showing some interesting products. The 
new SpartaDOS Construction Set ap- 
pears to be the most sophisticated and 
powerful DOS for the 8-bit Atari. 

The program sells for $40 and offers 
an amazing array of features, including 
many utilities. When used on a 130XE. 
a RAMdisk is created which can be con- 
figured as drive 1-8. Directories can be 
used, batch files created, individual files 
or entire disks locked (protected), and 
drive speed checked. 

SpartaDOS also stamps files with the 
time and date and even lets you change 
these parameters. A disk can be given 
a volume name that can be changed at 
any time. There are just too many fea- 
tures to mention here. 

Another product shown by ICD was 
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their R-Time 8 cartridge. This is a real- 
time clock for the Atari. Using Sparta- 
DOS without this cartridge allows you 
to stamp the time and date on files, but 
you must enter the information every 
time you power up. 

With R-Time, time and date informa- 
tion is automatically kept for you. Also, 
continuous time/date information can be 
displayed on the screen and is easily 
accessible from BASIC and other lan- 
guages. The cartridge uses a 5-year bat- 
tery, sells for $70 and has its own ex- 
pansion port. That way, you can keep 
this cartridge in your computer at all 
times and plug other cartridges in. 

Microbits Peripheral Products (MPP) 
has supported Atari owners for years 
and is one of the few "old timers" in this 
young industry. At CES, they were show- 
ing everything from hard disks to inex- 
pensive 1200-baud modems. 

MPP has two hard disks, a 5-megabyte 
and a 10-megabyte system. The 5-MB 
system will sell for under $1000 and in- 
cludes the hard disk interface, hard disk 
and software. The 10-MB system will 
probably sell for under $1200. 

If you already have a hard disk, then 
you can buy the hard disk interface for 
under $250. I saw the 10-MB system 
working with an 800XL, and loading 
files is fast. 

MPP will also be introducing a 1200- 
baud modem for the Atari that will sell 
for under $200. That price is to include 
the terminal software. MPP is currently 
working on a brand new telecommuni- 
cations program that will rmi on every- 
thing from Atari STs to IBM PCs to Atari 
800s. The hard disk systems and modem 
will be available by the time you read 
this. 

Another new product from MPP is the 
Micronet networking system. This will 
handle up to eight Atari computers run- 
ning off of one set of peripherals. Stan- 
dard Atari SIO peripherals may be used 
for a very cost effective multi-station 
Atari setup. 

An eight-workstation arrangement of 
Atari XL computers, color monitors, one 
set of peripherals and Micronet would 
cost roughly $3500, about one-third the 
cost of a similar Apple setup. 

A piece of hardware appealing most- 
ly to hackers and hardware buffs is the 
Microport. This is a breadboard which 
interfaces the Atari with the real world. 
It plugs into the parallel port on either 
an XL computer or a 130XE and gives 
you eight control channels. It will sell 



for $50 by the time this article appears. 

Mindscape amrounced that their only 

new product for the Atari, the Halley 

Project: A Mission in Our Solar System, 

is available now. Tlris is a real-time space 
adventure simulation written by Tom 
Snyder. Every planet, star or moon de- 
picted here moves at the same rate of 
speed and in the same orbit as in our 
actual solar system. 

The Halley Project uses high resolu- 
tion graphics and attention to detail in 
what looks like a very good simulation 
of outer space. Players must qualify for 
the top secret project by completing a 
series of navigational tests. 

Through these tests and obstacles, the 
program helps playei's master facts about 
our solar system, plus Hal ley's Comet 
and its orbit. An rmderstanding of gravi- 
ty, atmospheric conditions, orbital mo- 
tion, relative size, position and orbits of 
planets and moons, location of constel- 
lations, and how eclipses work are all 
provided in this $45 program. 

Synapse Software, now owned by 
Broderbund, is reported to be in healthy 
financial condition. This is evident in 
their introduction of several new prod- 
ucts for the 8-bit Atari line. 

Mindwheel and Essex are two new 
text adventures announced by Synapse. 
Billed as electronic novels, these are 
said to pick up where the printed word 
leaves off. What's interesting is that you 
begin these adventures by reading a 
hardbound book that sets the stage and 
describes the characters. Then you start 
the text adventure on your computer, as 
a continuation of what you've read. 

The parser used in these text adven- 
ture games is as good as that used by 
other text adventure publishers. 

Mindwheel takes you into the minds 
of fom- deceased people of extraordinai-y 
power. Off-the-wall humor throughout 
the adventure adds to its unique quali- 
ty. Essex is the story of an intergalactic 
search-and-rescue mission. 

Synapse also announced new versions 
of SynCalc and SynFile + that will take 
advantage of the extra memory in the 
Atari 130XE. If you already own either 
of these excellent products, Synapse is 
offering a $10 upgrade policy. For $10 
and your current disk. Synapse will 
send you the new, improved version of 
the program, through their customer 
service department. 

Synapse took this opportunity to an- 
nounce the SynCalc Template Disk. By 
the time you read this, it will be out. 



with twenty-two different templates for 
use with the SynCalc spreadsheet pro- 
gram. 

Spreadsheet formats and formulas in 
such areas as .stock/bond evaluation, ex- 
pense reporting, personal net worth, 
mortgage payment analysis and conver- 
sion tables are offered on this $19.95 
disk. These templates make an already 
excellent and useful program even more 
worthwhile. 

Another new product announced by 
Synapse is Letterhead. This program 
integrates word processing, an address 
file and graphics capability. 

Using windows and drop-down me- 
nus. Letterhead allows you to create and 
save letter formats, design letterheads 
using multiple fonts, and use a tickler- 
style address file for keeping track of 
your data. A keyboard, joystick, touch 
tablet or mouse can be used with the 
program. Letterhead will be available in 
late fall for mider $50. 

Microprose, a staunch Atai'i supporter, 
showed prerelease versions of several 
new simulations. Silent Service is a full- 
blown submarine warefare game featm'- 
ing high resolution screens of bridge 
and periscope views, engine controls, 
damage schematics and South Pacific 
maps (in three magnifications), com- 
plete with sub and enemy ship move- 
ments. The 48K game will be available 
this fall at $34.95. 

Aerojet is the next step up from a 
flight simulator. Here, you're a pro fly- 
ing fast stunts in a BD5 jet [like James 
Bond in the beginning of Octopussy). 
Up to four players can compete in aero- 
batic Olympics, always with the danger 
of engine malfunctions, weather condi- 
tions or "pile-ups" in the back of their 
minds. Acojet should be out this fall at 
48K, price to be announced. 

Gunship will be an attack helicopter 
simulation with three-dimensional tar- 
gets. Shipping will be before Christmas 
at a price to be announced. An ST ver- 
sion will follow in 1986. 

Kennedy Approach will also be avail- 
able in the fall at $34.95. You control up 
to twenty planes landing and taking off 
in the NYC area. Full voice synthesis 
takes the place of pilot-to-tower commu- 
nications, adding realism to the game. 

There you have it . By now, you should 
be able to see which new products will 
pique your interest and keep you up to 
date, n 
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A 
touch tablet 

musical 
instrument 

by Ron Torborg 

So you've purchased an Atari Touch Tablet and 
proven that you are an artist, after all. Congratula- 
tions. But what else can you use the Tablet for? Once 
again, ANALOG Computing comes to the rescue. 

After a very expensive archeological dig at the lit- 
tle known site of a lost future civilization, we've dis- 
covered the Musorqa. It's a musical instrmnent that 
is, sti-angely enough, compatible with the Atari Touch 
Tablet. It can be played by anyone, even if they've 
no musical talent. (That's because this program was 
written by someone with no musical talent.) 

The instruments it emulates haven't been found, 
so we don't know what they may have resembled. 
Thanks to the Musorqa, though, we do know what 
they could have sounded like. 
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Using a Musorqa. 

The program will start with the "PIAZO" selected 
(I wonder if the civilization printed their Ns side- 
ways). Other instruments can be selected by hitting 
the appropriate key. A marker will move to show your 
selection on the screen. Like the other selections, the 
instrument won't be changed until you lift your hand 
off of the Tablet. 

Normally, the program will play a single note at 
a time. To add richness, you can select THIRDS by 
hitting the left button on the Tablet, then lifting your 
hand from the Tablet. This section "adds thirds" to 
the notes you're playing. A pointer tells you wheth- 
er the option is on or off. The color of the title at the 
top of the screen will toggle between black and white 
as you use this option. 

We begin with the treble clef active. The location 
of middle C is shown on the screen. Hit the right but- 
ton to toggle between the treble and bass clefs. The 
background color will change, and a pointer will help 
you remember which you've selected. 



If you want to sustain a note, hold down the START 
button. The SELECT or OPTION keys would sound 
more logical to use here, but START is easier to hit 
when you're in the middle of your first concerto. 

Move your hand up and down on the Tablet to play 
the various notes of the scale. Move left to right to 
play various kinds of notes (eighth, quarter, and so 
forth). 

Customizing the program. 

You'll get no marks as a pure archeologist, but you 
can change the sounds of the instruments easily If 
you change the volume numbers contained in the 
DATA statements in Lines 720-800, the sounds will 
change. Each DATA statement must contain fourteen 
numbers, and each number must be less than 14. The 
last number in the line will be the volume that is sus- 
tained. 

You can also add more instruments by adding more 
DATA statements, but don't forget to change variable 
V's size in Line 660. You will also need to choose 
a key to activate your new instrument and find the 



FOR ATARI *400/800/1200/600XL/800XL* 



"^m. B®Sg 



For ATARI 800XL, 600XL with 64k. 
Replacement operating system to run the 
vast majority of all ATARI software. No 
translator or disk to load! 
Proper RESET operation especially impor- 
tant for programs like LETTER PERFECT, 
DATA PERFECT, TEXT WIZARD, etc. 
One touch access to extra RAM, all RAM. 
One touch BASIC on. 
Easy plug in installation. 

NOW INCLUDES DUAL OPERATING 
SYSTEM BOARD! 

'Includes MacroMon XL which is an ex- 
cellent, unique monitor for beginner and 
pro alike— written especially for the BOSS. 
$79.95 for 800XL/600XL with 64K*. 



All 
M 



Hen 
acroware 




FFinTI^IZ 



An all machine language text, 
graphics, mixed mode dump for EP- 
SON, GEMINI, NEC, PROWRITER, 
OKIDATA, M-T SPIRIT, IbOL, 
KXP-1090, DMP-80, ISD 480, 
SEIKO/AXIOM GP550A. 
Self booting can be used while pro- 
gramming or even running other pro- 
grams. 

Works with oi without BASIC, 
ED/ASM, PILOT, LOCO. Calendar 
generator. Horizontal format allows 
text to be continued in same direction. 
Change widths, height, center and 
much more from the keyboard or your 
program. Special handlers for PAINT, 
Micro-Illustrator, LOGO, Micro- 
painter, etc. Includes LISTER program 
for inverted and special characters plus 
demos and ideas. $29.95* 16K Disk- 
All Interfaces. 



diskwiz-ll 

Fast and easy to use repair, edit, ex- 
plore, dup, disk utility package. Single 
load, single or double density. Special 
printout (apabilities. 
Repair or change of linked DOS2 or 
OSA+2 files, directories, dup 
lilenames. Fast searches, mapping, file 
trace. Disassembler, speed check and 
much more! Low priced, fast, easy, 
and powerful! $29.95 16K Disk. 

Send s.a.s.e. for update info. 

•TERMS: U.S. lunds; check or M.O. 
add $2.50 shipping/handl- 
ing add 6% CA — 6.5% LA 
COUNTY add $3.00 for 
C.O.D. No charge cards ac- 
cepted add $2.50 foreign 
orders normally out within 
48 hours. 



P.O. BOX 2205/REDONDO BEACH, CA 90278 

(213) 376-4105 

* Trademarl* of Atari, Int. 
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code for that key to PEEK at in location 764 at Line 
480. 

Variables. 

N Primary note to be played. 

N2 "Thirds" note to be played. 

N( Array holding the codes for 

all notes. 
V( Array holding volume for the 

nine instruments. 
X X location to print note, read 

from Tablet; also used to 

establish duration. 
Y Y location to print note, read 

from Tablet; also used in 

array N(] to establish note 

frequency. 

D Duration value. 

Z Code for screen character 

used after note is moved to 

maintain graphics. 
THIRD Toggle variable for playing 

"Thirds" — 1 = on, O = off. 

T Previous value of THIRD. 

I histrument number. 

12 Previous value of I. 

OCT Toggle variable for switching 

clefs — l = bass, 0= treble. 

OCTOLD Previous value of OCT. 

V,W,W1,W2 .... Counters. 

P, MENU$ .... Storage variables used with 

read statements. 

Program description. 

Lines 100-180 — Select title screen colors, turn 
off cursor, set "key pressed" to 1 and execute in- 
itialization subroutines. 

Lines 190-240 — Subroutine to play uidividual 
notes; branch to Line 260 if "Thirds" is on. 

Lines 250-280 — Subroutine to play individual 
notes if "Thirds" is on. 

Lines 290-420 — Main program. Read posi- 
tion of touch on Tablet; print "note" and branch 
to 430 if Tablet is not being touched. 

Lines 430-530 — Read Tablet's buttons and 
keys; adjust values to reflect status and print 
pointers to screen to reflect changes. 

Lines 540-800 — Read note values into array 
N() and instrument's volume values into array 
V(). Also prints the instruction screen while 
these values are being read. 

Lines 810-950 — Print main screen display. 

Lines 960-1330 — Print title screen and read 



in machine language subroutine for the screen 
colors. 

Thanks to Richard J. Kalagher, whose Multi Screen 
Generator appeared in ANALOG Computing's issue 
12. That generator was used to set up screen colors 
for Musorqa. D 

Ron Torborg is vice president o/SchenkeJ &■ ShuJtz, 
Inc., an architectural/engineering firm. He has three 
years' experience on Wang computers, two on the 
Atari 800 and one on a Computervision CAD-CAM 
system. 

Listing 1. 

100 REM MUSORQA 

110 REM BY RON TORBORG 

120 REM 

130 Kl=l : K2=2 : K3=3 : K4=4 : K5=5 : K6=6 : K7=7 

:K8=8:K9=9:K10=10:K12=12:K14=14:K23=23 

140 GRAPHICS K0:SETC0L0R K2 ,ti:0,KO:SETC 

OLOR Kl,KO,Ke:POKE 764,31 

150 POKE 752,Kl:G0SUB 990:H=K0 

ISO GOSUB 550:G0SUB S20:G0T0 300 

190 REM PLAY MOTE 

200 H=HtY+K12»C0CT=Kl}) : H2=H tY-K2+K12» 

(0CT=K13) 

210 IF THIRD=K1 THEH 260 

220 POSITION 19,K23:PRINT N; 

240 FOR U=K1 TO K14:S0UND K0,N,K10,UCH 

,I}:NEKT W:FOR W1=K1 TO D»K6:NEHT M1:R 

ETURN 

250 REM PLAY NOTE HITH THIRDS 

260 POSITION 15,K23:PRIMT N;:POSITION 

K23,K23: PRINT N2; 

280 FOR H=K1 TO K14: SOUND KO,N,Kie,VCH 

,I}:SOUND K1,N2,K10,UCH,I} :NEKT M:FOR 

H1=K1 TO D»Ke:NEKT Ml: RETURN 

2?0 REM READ TABLE VALUES 

300 TRAP 380 

310 X=tK4+INT (PADDLE CK03/45.6J»K8} :Y=K 

23-PADDLE tKl) /KIO : D:= CK-K4J /K8+K5* CK=20 

}+K9«(K=28)+20»(K=:36} 

320 IF Y<K4 THEN 440 

330 IF Y>22 THEN Y=22 

340 IF X>36 THEN K=36 

350 IF K<K12 THEH X=K12 

360 LOCATE X,Y, Z : POSITION X,Y;PRINT CH 

R$(20} 

380 GOSUB 200: POSITION X,Y: PRINT CHR$ ( 

Z) 

390 IF PEEKC532793=K6 THEN 390 

420 POSITION 15, K23: PRINT " 

"; :60T0 300 
430 REM READ TABLET BUTTONS AND KEYS 
440 SOUND Ke,KO,KO,KO:SOUND K1,K0,K0,K 


450 T=THIRD:IF PTRIGCKO) THEN 480 
460 THIRDS NOT THIRD:S0UHD K1,K0,K0,K0 
:P0SITI0H K6,K6 + T:PRINT " "■:P0SITI0N K 
6,K6+THIRD:PRIHT CHRS t96J 
470 SETCOLOR Kl , KO, THIRD»K14 
480 I2=I:K=PEEKC764) : 1= (K=31J +K2*CK=38 
J+K3*(K=26}+K4*(K=24J+K5»tK=293+K6«tK= 
27) +K7* (K = 51) +K8* tK=53 J +K9»tK=48} 
490 IF 12<>l THEN POSITION K7,K8+I2:PR 
INT "■ •■: POSITION K7,K8+I: PRINT CHRSC25 
) : SETCOLOR K2 , I»l . 66 , K8 
500 OCTOLD=OCT:IF PTRIGCKl) THEN 380 
510 OCT= NOT 0CT:P0SITI0N K10,19*(0CT= 
K0)+K7«t0CT=KlJ :PRINT "C" :P0SITI0N KIO 
,K7»C0CT=K0)+19»{0CT=K1J : PRINT "■_" 
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526 POSITION KB, 20+OCTOLD: PRINT " "iPO 

5ITI0H K6,28+0CT: PRINT CHRS C96J :5ETC0L 

OR K4,K3W6CT,K4)(0CT0LD 

530 GOTO 300 

540 HEM SET NOTE, INSTRUMENT UALUE5 

550 DIM Nf37) :I=Kl:POSITION 17,K0:PRIN 

T "TUNING" 

560 POSITION KQ.KIO: PRINT "I 



EFT BUTTON = THIRDS 



570 POSITION K0.K12; PRINT "I 
580 POSITION KO , K14 '• PRINT 
550 POSITION KO. 16: PRINT "I 



EY5 = INSTRUMENTS 



620 RESTORE 640: FOR R=K1 TO 37: READ NT 

: N CR) — NT : NEXT R 

640 data" 0,0, 0,26, 29, 31, 35, 40, 45, 47, 53 

,60,64,72,81,91,96, 108 , 121 , 128 , 144 , 162 

650 DATA 182,193,217,243,255,26,29,31, 

35,40,45,47,53,60,64,72,81 

660 DIM Utl4,9) :RESTORE 720 

670 FOR U:=K1 TO K9:F0R W=K1 TO K14:REA 

D P:V(H,V)=P:NEKT U:NEKT V 

680 POSITION K3,K0:PRINT "Tuning COHPI 

ete Hit START to begin" 

690 POSITION K5, 18: PRINT "Frequencies 

appear as you play" 

700 IF PEEK 4532793 <>K6 THEN 700 

710 RETURN 

720 DATA 12,10,8,6,4,2,2,2,2,2,2,2,2,2 

730 DATA 6,8,8,8,8,8,10,10,10,10,10,10 

,10,10 

740 DATA 0,0,0,0,0,10,2,2,2,2,2,2,2,2 

750 DATA 8,2,2,2,0,0,0,0,0,0,0,0,0,0 

760 DATA 4,6,8,10,12,8,6,4,2,2,2,2,2,2 

770 DATA 4,10,4,10,8,10,4,10,4,10,4,10 

,12,4 

780 DATA 0,14,14,0,0,14,14,0,0,14,14,0 

,0,10 

790 DATA 14,12,10,8,10,12,10,12,14,12, 

10,8,6,4 

800 DATA 4,2,4,2,4,2,4,2,4,2,0,4,6,8 

810 REM PRINT MAIN SCREEN 

820 PRINT "IS"; : POSITION K14,Ke:PRINT " 

THE MUSORQA" 

830 SETCOLOR K2,K2, K8 :SETCOLOR K4,K0,K 

840 POSITION K9,Kl: PRINT 

850 POSITIO N K9jK2: PRINT 

POSITION 



860 



: PRINT 



870 FOR V=K4 TO 21:P0SITI0N KO,Y:PRINT 



.":NEJ(T Y 



880 POSITION KIO, 19: PRINT "C" 
890 POSITION K0,22:PRINT " 



900 DIM MENuicKO) : RESTORE 910:F0R M=K1 
TO 21:READ MENU$ : POSITION KO,H:PRINT 



MENU$:NEXT H 
910 DATA 



MENU 



920 DATA rLEFT — , (THIRDS , | OFF ♦,|0N 

930 DATA PIAZO 1|,SM0EG 2 ,KAZII 3 ,ST 

EJT 4 ,ZOORD 5 ,BENGO 6 ,ZATAQ 7 ,NMOR 

A 8 ,HDGUM 9 

940 DATA rRIGHT- ,lCLEF,|TREB ♦,iBA5S 

950 RETURN 

960 REM ««PRINT TITLE SCREEN AND SET S 

CREEN COLORS USING RICHARD J. KALAGHER 

•S "MULTI SCREEN GENERATOR"*** 

970 REM ««ANALOG ttl2»K 

990 PRINT "H THE MUSORQA" 

1000 POSITION K0,K1:PRINT " 



1010 PRINT " Ron Torborg" 

1020 POSITION K0,K23: PRINT " to be use 

d With the ATARI Touch Tablet"; 

1030 RESTORE 1240: FOR N=KO TO 99: READ 

X:PDKE 1664+N,X:NEXT N 

1840 C0LTAB=1712 : LUMTAB=C0LTAB+24 

1060 X=USRC1693J:P0KE 512, 128: POKE 513 

,K6 

1110 DSTART=PEEK 15603 +256«PEEK C5613 

1120 FOR N=DSTART+K6 TO DSTART+28 

1130 POKE N,130:NEXT N:P0KE DSTART+K3, 

194: POKE 54286,192 

1190 PRINT CHRS (1253 : POKE 710,PEEKCC0L 

TAB3 : POKE 709 , PEEK CLUMTAB3 : RETURN 

1240 DATA 72,138,72,174,156,6,189,176, 

6, 141 

1250 DATA 10,212,141,24,208,189,200,6, 
141 , 23 

1260 DATA 208,238,156,6,104,170,104,64 
, 18 , 104 

1270 DATA 169,7,160,168,162,6,32,92,22 
8, 96 

1280 DATA 169,1,141,156,6,76,98,228,14 

8,0 

1290 DATA 0,0,8,8,8,8,8,6,8,6 

1300 DATA 8,6,8,6,8,6,8,8,8,8 

1310 DATA 8,148,0,10,10,10,0,0,0,0 

1320 DATA 0,0,0,0,0,0,0,0,0,0 

1330 DATA 0,0,0,0,0,0,0,0,0,0 



CHECKSUM DATA. 

(see page 30} 

100 DATA 276,313,80,285,451,998,15,556 

,666,304,984,595,209,535,557,6824 

290 DATA 521,698,580,542,757,777,26,91 

7,652,905,975,199,239,609,478,8875 

470 DATA 116,423,59,4,970,925,704,146, 

329,76,913,189,4,42,196,5096 

650 DATA 863,523,665,154,640,998,596,3 

,634,128,867,41,768,736,55,7671 

800 DATA 920,472,738,415,285,265,128,8 

37,774,906,786,910,312,394,373,8515 

950 DATA 612,352,904,261,946,638,452,7 

20,422,887,258,654,958,416,824,9304 

1250 DATA 593,863,599,344,149,181,840, 

27,28,3624 



^x;>> 








PAGE 92 / SEPTEMBER 1985 



ANALOG COMPUTING 



9IC 

ATARI" 



^^ 



^^ 



^^ 



ATARI HARDWARE 
PACKAGES 

Atari 520 ST Computer Pkg. #1 
Atari SM 124 Monochrome Monitor 
Atari SF 354 (S'A") Floppy Disli Drive 



POWER WITHOUT THE PRICE 
AT. . .COMPUTER CREATIONS 

FLOPPY DISKS AS LOW AS 79<t: EACH 

DISKETTES (2 box minimum) 10 per box 



Atari 520 ST Computer Pkg . #2 
Atari SC 1224 (12" FIGB) Color Monitor 
Atari SF 354 (3'A") Floppy Disk Drive 



Atari 800 X/L Computer 
Atari 1050 Disk Drive 



Pkg. #3 



Call For Our Low Prices 



DISK DRIVES 

Alan 1050 

Indus GT (Free Software) CALL 



FOR 

NEW 

PRICES 



CALL 

FOR 

NEW 

PRICES 



Atari SF 354 (3'/;" 
floppy disk 500K) 

Alan SH 317 (3'/2" 
hard disk 10 MB) 

Happy Enhancement for Atari 
810 and 1050 Drives . . 

PRINTERS 

Atari XTM 201 

Atari XTC 201 

AtariXDM 121 

Atari XMM 801 

Atari ST 504 

, EPSON PRINTERS 

' LX-80 (80 column) 

LX-80 Tractor Feed 

Epson FX-80+ (80 col.) 

STAR MICRONICS PRINTERS 

SG-10 (80 column) 

SG-t5 (136 column) 

SD-10 (80 column) 

SR'10 (80 column) 

Powertype Daisywheel , 

Powertype Tractor Feed 

PANASONIC PRINTERS 

KX- 1090 

. KX- 1091 

' KX-1092 

Okimate 10 plus plug n' print 

PRINTER INTERFACE CABLES 

I MPP-Microprint 

' MPP-1150 Parallel Printer 

Interlace 

U-Prinl A 

A-16 Interlace/Bufler 
I APE Face XLP 



CALL 

FOR 

PRICES 



CALL 

FOR 

PRICES 



59 
69 
99 
59 



APE Face12XLP 59 






Generic (SKC) 


Wabash 


Maxell 


Generic (Bulk) 


BASF(Ea.)3y2" 


# Boxes 


SS/DD 


DS/DD 


SS/DD 


DS/DD 


SS/SD 


DS/DD 


SS/DD 


DS/DD 


SS/DD 


DS/DD 


2 


9.99 


11.99 


13.99 


19.99 


18.99 


27.00 


7.99 


9.99 


3.49 


4.99 


3-6 


8.99 


10.99 


12.99 


19.49 


17.99 


26.00 


6.99 


8.99 


3.19 


4.49 


7-10 


7.99 


9.99 


11.99 


18.99 


16.99 


25.00 


6.49 


8.49 


2.99 


3.99 



Panasonic Printers, Black 
Panasonic Printers, Color 



8 
11 



MONITORS 

Atari XC 141 (14" Composite 

Color) 

Atari XM 148(12" CALL 

Monochrome, 80 column, FOR 

low resolution) PRICES 

Atari SM 124(12" 

Monochrome, 80 column, 

high resolution) 

AtanSC 1224 (12" RGBColor) 

Sanyo 1 2" Green Screen 79 

Sanyo 12" Amber Screen 79 

Monitor Cable 5 

Teknika 13" Color MJ 10 .189 

MODEMS 

Atari 1030 Direct 300 BAUD 69 

Atari XM 301 Direct 

Connect 300 BAUD CALL 

MPP-1000E Modem 79 

Signalman XII Modem 1 99 

R-Verter 39 

CompuServe Starter Kit 21 

850 Interlace 114 

Anadex (Hayes Compatible! 239 

UPGRADES/ACCESSORIES 

Flipn' File 10 4 

Flipn' File 15 7 



Microbils Microstuffer 

MPP-1151 

PRINTER RIBBONS 
Gemini Printers (Black) . . . . 
Gemini Printers (Blue/Red/ 

Purple/Brn/Grn) 

Epson Prmters (80) Series) . 



109 
62 



Original Flip n' File 50 
Flip n' File Cart Case 
Library Cases! 10 colors) . 
Disk BanWS (Holds 50) . , 
Disk Bank (Holds 101 .. 
Power Strip (6 outlet) 
Lineguard Spike Suppressor 
Disk Drive Cleaning Kit , 
MicroMate Paper 

(20#, 540 sheets) 
Pnnter Stand (wire) 
Dust Covers , , 
Disk Coupler (notch) 



14 
12 

4 
12 

5 
16 
13 

6 



10 
16 

Call lor availability 
3 



UPGRADES: 

Ram Rod X/L W/Omnimon 
Omniview for 800 XL , . . . 

U S Doubter 

MPP64 K 

R-Time 8 Cartridge . , 



99 
49 
59 
69 
59 



COMPLETE LINE OF ATARI SOFTWARE 
CALL IF YOUR PROGRAM IS NOT LISTED!! 



SOFTWARE 

NEW ATARI PROGRAMS 

Codewriter 39 

Filewriter 21 

Reportwriter 21 

f^enuwriter 21 

Home Integrator 20 

Small Business Inventory 12 

Salesman's Expenses 12 

Accounts Rec./Pay 12 

Retail Invoice 12 

Final Legacy 15 

Adventure Writer 18 

Star Voyager 12 

EPYX 

Dragonriders of Pern (D) 21 

Summer Games 28 

Pitstop II (D) 28 

Ballbla2er(D) 28 

Rescue on Fractalus (D) 28 

Temple of Apshai (D) 21 

ACCESS 

Beach Head(D) 24 

ACTIVISION 

Decathalon{R) 18 

Pitfall II (R) 18 

Space Shuttle (R) 18 

Ghost Busters (D) 22 

BATTERIES INCLUDED 

Paperclip (D) 41 

Homepak 35 

B/Grapti 48 

BRODERBUND 

Printshop(D) 31 

Spelunker(D) 21 

Stealth (D) 21 

Whistler's Brotfier (D) 21 

DATASOFT 

Bruce Lee 28 

Dallas Quest 24 

Conan 28 



Letter Wizard , 



52 

ELECTRONIC ARTS 

Archon (D) 18 

Pinball Construction (D) 18 

IVI.U.L.E, (D) 18 

fvlurder/Zinderneuf (D) 18 

One on One (D) 25 

Archon II (Dl 25 

fvlusic Construction (D) 18 

Realm/Impossibility (D) 18 

Hard Hat Ivlack 14 

Seven Cities of Gold 25 

Cut and Paste 18 



INFOCOM 

Cut Throats (D) 24 

Deadline (Dl 31 

Enchanter (D) 24 || 

Hitchhiker's Guide to 

ttie Galaxy (D) 24 

Infidel (D) 28 

Planetfall(D) 24 

Sea Stalker (D) 24 

Sorcerer (D) 28 

Starcross(D) 31 

Suspect (D) 28 

Suspended (D) 31 

Witness (D) 24 

Zorkl(D) 24 

Zork II or III (D) 28 

Invisiclues Hint Books 7 

MICROPROSE 

F-1 6 Strike Eagle (D) 24 

Ivlig Alley Ace (D) 24 

Solo Flight (D) 24 

Kennedy Approach 24 

OSS 

Action (R) 62 

Action Tool Kit(D) 25 

Basic XL (R) 50 

DOS XL(D) 25 

MAC/65 (D) 50 

fVlac65 (R) 82 



42 



'I 



MAC/65 Tool Kil(D) 

Writer's Tool Kit 

ORIGIN 

Ultima III (D) 

SCARBOROUGH 

Mastertype 28 

Net Worth 55 

SIERRA ON LINE 

Ultima I 24 

Ultima II 41 

SYNAPSE 

Quasimodo 17 

Alley Cat 14 

Syn-File+ 35 

Syn-Calc 35 

Syn-Trend 28 

Syn-Comm 28 

Syn-Stock 28 

Mindwheel (needs 2 drives) ... Call 

TRONIX 

S,A,M 42 ] 

Chatterbee 28 



To order call TOLL FREE 

1-800-824-7506 



No extra ctiarge 
for IvIasterCard 
or Visa 



ORDER LINE ONLY 



COMPUTER CREATIONS, Inc. 

P.O. BOX 493 - DAYTON, OHIO 45459 



For information, order inquiries, or for Ohiio onders (513) 435-6868 
OrderLinesOpen9:00a.m.to9:00p.m.Mon.-Fri.;10a.m.to4:00p.m. Sat. (Eastern StandardTime) Minimum $15 per order. C.O.D.(add$3.00).PIeasespecifycompulersystem. Call 
toll tree number to verify prices and availability of product. Prices and availability are subiect to change without notice. We strip CO. D. to Continental U.S. addresses only! Hardware 
requires additional freight charges (min. S4. 00). Software and accessories add $3.00 shipping and handling in Continental U.S. Actual freight will be charged outside U.S. to include 
Canada, Alaska, Hawaii, Puerto Rico and APO. Ohio residents add 6% sales tax. Canadian orders add 5% shipping, (min. $5.00). All other foreign orders, pleaseadd 1 5% shipping. (min. 
$10). For immediate delivery send cashier's check, money order or direct bank transfers. Personal and company checks allow 3 weeks to clear. School purchase orders welcome. Due 
to our low prices, all sales are final. NO CREDITS. All defective returns must have a return authorization number. Please call (513) 435-6868 to obtain an RA# or your return will not be 






accepted for replacement or repair 



rf«i 
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Reader Comment 

continued from page 9 



Atari users in Poland. 

We are members of a new Atari users 
family and the first Atari club in Poland. 
We now have eleven computers and we 
hope to develop in quantity and quality. 

All the hardware is individually im- 
ported, because we camiot buy them in 
Poland. Our big problem is softwai'e and 
knowledge. 

We are looking for friends who can 
support us in our computer childhood. 
We'd like to request your readers to send 
us second-hand magazines, books and 
programs for the Atari, Would you help 
us to start? 

Sincerely, 

Wieslaw Migut, Club Coordinator 

ul.Budryka 9/216 

30-072 Krakow 

Poland 

English Error. 

I typed in the program English Error 
Messages in BASIC from the February, 



S~Gcni&^ 




Experience the MA5ic 
o{ vjovir compviter ! 

Whether you are using a word processor, or a spreadsheet. 

adding to a data base, or |ust playing your favorite game. 

Now, with one keystroke, you can instantly: 

• Jot down several pages of notes 

• Edit and print a tile 

• Pertorm a quick calculation on a five 
lunction calculator {in decimal or hex!) 

• Look up Atari control codes 

• Get a disk directory 

• Lock, Unlock, Rename, and Delete files 

• Even formal disks 

And in the blink ol an eye return to 
just where you left off! 

All of this is possible only with Genie. 

Genie is completely invisible to almost all 

programs, and appears only when you summon it. 

It uses only the "extra" HfKM in a 64K Atari XL or 

XE, so it doesn't even take up memory space! 

Available lor Atan XL or XE computers with al least 64K 

Genie is only S29.95 plus 2.00 lor postage and handling 

(Texas residents please add 5 l.'a% sales \ax). 

New Horizons Software 

PO Box 180253 • Austin, TX 78718 
For more mlormalion, call (512) 2800319 



New Horizons 

Expanding Your Life 



1985 ANALOG Computing (issue 27). It 
will not run on my system. I've checked 
it with D:Check four times, and every- 
thing checks out okay. 

I have an Atari 400 with 48K memo- 
ry and a 1050 chsk drive with DOS 3. 
Will it only work with DOS 2, or is there 
something that I can change to get it to 
work properly? 

Sincerely, 

Glemi Spurlock 

Nashville, TN 

The article that accompanied English 
Error Messages specifically stated that 
the program would only work with DOS 
2 and not DOS 3. We have found that it 
is compatible with Atari's new DOS 2.5, 
which will work with q 1050 in either 
enhanced or single density. — Ed. 

RAM-OS ROMs. 

In your RAM Operating System arti- 
cle (issue 29, April, 1985), the value $FE 
is used to disable the ROM areas. This 
also disables the built-in BASIC on the 
800XL. If you use the value $FC, you 
can return to BASIC and still retain the 
RAM-OS. 

Also, is there any way to alter the old 
ROM locations and enable the ROM lo- 
cations retaining those changes? 

Thanks, 

John M. Walter 

Morningside, MD 

P. S. The April issue is one of your best 
yet. Keep up the good work! 

To have the ROMs in the Operating 
System i-emember any changes would re- 
quire changing the chips for new ones. 
One of the characteristics of ROMs is 
that you cannot write to them without 
special equipment. —Ed. 

Cheep Talk corrections. 

In Cheep Talk, there were a couple of 
errors in my original material. 

The labels in Figures 5 and 6 were 
reversed. Pin 9 on the processor is really 
LRQ and goes to pin 4 on joystick plug 
2. Pin 20 on the processor is really ALD 
and should go to pin 3 on the plug. 

The synthesizer, however, does work 
as presented in the magazine — only the 
labels were inaccurate. 

I apologize for any confusion created 
by this. 

Sincerely, 

Lee S. Brilliant, M.D. 

Granada Hills, CA 



BASIC problems. 

First, I would like to compliment you 
on your fine magazine. I received a copy 
of The ABCs of Atari Computers with 
my subscription and I couldn't be hap- 
pier. My only regret is that I didn't try 
to get a copy of Atari Roots when they 
were available. 

I would also like to say that the con- 
tent of the July issue was simply the best 
I have seen anywhere. I typed all the big 
programs and use them, too. 

Next, I would like to add to the Read- 
er Comment froin Matthew Ratcliff. He's 
indeed correct in his indignation about 
version 2 of Atari BASIC. 

When I first got my 800XL, I thought 
that I was the problem. I found out later 
that I was not to blame. I have followed 
this controversy in several magazines 
and on the message bases of several 
bulletin boards. I believe, however, that 
some battles aren't worth fighting. 

I tried to make the most of the bad sit- 
uation, so I bought BASIC XL and was 
extremely pleased to find out what a 
great product it truly is. I had read re- 
marks as to how good it is, but I had not 
read any review of BASIC XL. It is as 
good as the BASlCs available here (East- 
ern Illinois University) on the terminals 
that are corarected to a mainframe com- 
puter BASIC XL is astonishing. 

I am sure that there are other similar 
BASIC replacements available for the 
Atari. As for me, I am learning Action! 
now and I hope you continue to publish 
programs written in the Action! lan- 
guage. I also hope Russ Wet more con- 
tinues to cover the subject in his col- 
umn. 

Sincerely, 

Harry L. McDonald 

Charleston. IL 

P/M Creator/Animator fix. 

The following will fix a small display 
problem with P/M Creator/Animator 

from issue 23, page 33. 

An extraneous 2 appears on-screen on 
an 800XL above PO PI P2, due to an er- 
ror in Line 152. To correct the problem, 
change the number of blank spaces be- 
tween the quotation marks in Line 152 
from 9 to 30. This will result in the 
checksum for Line 152 changing from 
451 to 586. The first checksum total will 
also change from 6501 to 6636. 

Demiis F. Hamilton 

Cockeysville, MD 
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WHY NOT SO COLUMN DISPLAY ? 



(Ri 



Until noLLi, flTRRI " oiimers mere limited to 40 column 
display mord processing by available software. 



Now, MTS Software presents 





iKi 



The first 80 column word processor for the x^JAFil " 
computers with NO ADDITIONAL HARDWARE REQUIRED 



COLUMN 80 features: 

• 80 column display 

• Easy to use 

• C-iuick reference manual 

• Ideal for home use 



• NO ADDITIONAL HARDWARE REQUIRED 

• Works with either TV or Monitor 

• Advanced formatting capability 

• Integrates V7ith other softvfare 



see your dealer . . . 

Or call or vrite for more information. 
For direct orders enclose $59.95 plus 
$3.00 for shipping and specify UPS or 
first class mail delivery. 

OPdeP Line: 716/634-0578 



PO Box 623 

Williamsville, NY 14221 
716-634-0=S7S 



iS) 



COLTJIIN 80 is available eKcluL=;ively for ih^ ATARI '^cotnpcttei-s (48k required). 
Developed by Elmer Scharmach of MTS SOFTVAEE. 
ATAFJ is a registered +.radetnarl: of AT AM Inc. 



Dealer inquiries invited. 
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READER SERVICE # 



ADVERTISER 



READER SERVICE # 



ADVERTISER 



132 Allen Macroware 90 

122 American TV 55 

— ANALOG Publishing 2, 8, IBC 

125 Arrays/Continental 64 

109 Astra Systems 18 

134 At-A-Glance 72 

103 Atari Corp 7 

— Batteries Included OBC 

115 G.A.R Software 30 

104 CDY Consulting 10 

119 Centurian Enterprises 53 

113 Computability 27 

133 Computer Creations 93 

138 Computer Games Plus 96 

143 Computer Mail Order 34 

117 Computer Palace/Royal Software 38 

126 Consumer Electronics 65 

108 Eastern House 16 

102 Eclipse Software 5 

106 Electronic One 13 

127 Elite Software 65 

123 Games Computers Play 57 

121 G.T. Enterprises 53 

This index is an addilional service. Wlvlc every e/fort is made (o proi'ide n coiiipjple 



131 GTA, Inc 84 

107 Happy Computers/San Jose Computers 14 

141 HSU Software 9 

140 Intra-Tech 9 

112 Jesse Jones 26 

116 Kyan Software 37 

120 Lone Star Computer 53 

129 Lotsa Bytes 70 

128 Lyco Computers 66 

137 Misty Mountain Software 96 

136 MTS Software 95 

110 Newell Industries 20 

142 New Horizons Software 94 

101 O.S.S IPC 

124 Protecto 58, 59, 60, 61 

130 RAK 83 

— Senecom 13 

118 Software Discounters 42, 43 

139 Southern Software 96 

105 Unlimited Software 9 

135 Wedgwood Rentals 72 

114 White House Computers 29 

111 Xlent Software 21 

and accurate I/sling, (he publisher cannot be responsible /or inodi'erlenl errors. 



QUALITY 

LOW COST SOFTWARE 

FOR ATARI 400, 800, XL, XE 
.Complete documentation includes detailed 
instructions with examples 



,/!# HOME OFFICE $15.95 

tjf^- PRINT and MAIL newsletters, docu- 
ments correspondence. Any printer, any size 
files WORD PROCESSOR: Center, justify, in- 
dent, headers, trailers, set margins & line 
spacing, page numbering. DATA BASE/ ;?i| 
MAIL-LIST for keeping name & address S| 
lists, household inventories, magazine 
catalog etc. Predefined formats for labels, data 
base printouts Also define customized formats. 



SING- A- LONG $11.95 

Play your old favorites! Or create your own! 
Displays lyrics & graphics while music plays 
^, Encompasses entire bass & treble 
<i!f''Ml clefs(C2-C6), fourvoices rests slurs 
\K*.!si* sharps & flats Incremental pitch with 
8 bit sound. 



ATARI 520 ST - $699.95 



^^ 



RECREATION $1 1 .95 

Exclusive collection of games, simulations 
amusements. These all new programs are not 
available else where. 



UTILITIES $11.95 

Online terminal program, sector copier, DOS 
added to BASIC, disk directory printer 



ANY three disks $24.95 

ALL four disks $34.95 

(ORDER LINE 1 -800-241 -6789) 

Please add $1 .95 for postage and handling 
Check, MoneyOrder, VISA, MasterCard, in U.S. 
Funds or equivalent. 

C\ MISTr' MOUNTAIN SOFTWARE 
,„^ 10324 W. 44th Ave. #2 A 

^ Wheat Ridge, CO 80033 



CIRCLE #137 ON READER SERVICE CARD 



RAN A 1000 
ASTRA 1620 
ASTRA "BIG D' 
INDUS CT 



$ 99.95 

$299.95 

$549.95 

CALL 



APE FACE $49.95 

UPRINT A $59.95 

UPRINT A16 (Inc 16K BUFFER) . . $79.95 

BASIC XE $49.95 

BASIC XL $39.95 

THE WRITER'S TOOL (w/spell Ckr).$49.95 

MICROLEACUE BASEBALL $24.95 

MICROLEACUE TEAM DISC $14.95 

MR. DO! $19.95 

BOUNTY BOB & MINER 2049ER. $29.95 

F-15 STRIKE EAGLE $19.95 

KENNEDY APPROACH $22.95 

CRUSADE IIM EUROPE $22.95 

GEMSTONE WARRIOR (SSI) $24.95 

-ALTERNATE REALITY* $29.95 

MINDWHEEL (SYNAPSE) $29.95 

MINDSHADOW (ACTIVISION) $19.95 

WISHBRINGER (InfOCom) $27.95 

ADVENTURE CONSTRUCTION SET$59.95 

ULTIMA IN $37.95 

UNIVERSE $69.95 

RETURN OF HERACLES $24.95 

BOOK OF ADVENTURE GAMES . . . $14.95 

Please add S2.50 shipping (S4.50 outside USAl 

California residents add 6%. 



COMPUTER GAMES -i- 



BOX 6144 

ORANGE CA 92667 

(714) 639-8189 
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SOUTHERM SOr^TWftRE 
PHtJNE 203— VHA— 0«5'S<5. 

CALL FOR FREE CftTALOQ li PRICE LIST 

SOFTWARE 

OLL THIRD PARTY TITLES 30% OFF 

H«Rt=Y EtMM«=»tMC:EMEMT 

BIO ENHANCEMENT •159.93 

1030 ENHANCEMENT 139.93 

1050 CONTROLLER 39.93 

«^XLOIM RAMROlAlER 

12BK RAM DISK 239.95 

^BK RAMPDWER 79.93 

32K RAMPOWER 39.93 

I CD I IMC 

SPARTA DOS 34.93 

US DOUBLER 59.95 

CHIP FOR 810 89.93 

HAPPY ARCHIVER 49.93 

R-TIME CARTRIDGE 69.93 

ftTftRI 

1050 DISK DRIVE 159.95 

1050 M/HAPPY INSTALLED 379.95 

LIGHT PEN 39. 93 

NUMERIC KEY PAD 29.95 

TOUCH TABLET 47. 95 

MISC MERC:;M«tMDISE 

PRINTERS CALL 

MODEMS CALL 

DS/DD LIFETIME DISKS (50)... 79. 93 



«IL PRICES LISIED ARE FDR WIIL DRDERS OKU. ADS tOI 
FDR C.O.D. HKI ISl FOR CREDII CARD ORDERS. DEALER I 
USER EROUP IKBUIRIE9 KLCDPIE. SEW FDA FREE CAIALOS 
Am PRICELISI. ADD )3 FOR SHIPPIKS ARD IKSURARCE. 
FDREIER ORDERS NEICDIIE IIIH SUFFICIERI POStAGE IWlUtEI. 
msr ORDERS RECEIVED lEFORE ROOH FILIED SAKE DAV. 
All IS FDR AIR MIL OH It] FOR OVERmCHT SHIPIHI. 



SOUTHERN SOFTWARE 

A DIVISION OF SOUTHERN SUPPLY COMPANY 
1879 RUFFNER ROAD BIRMINGHAM, AL 35210 

24 HOUR PHONE 205-956-0986 
Order before 11 A.M. lor same day shipping. 
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BACK ISSUES 




^1: EdiicatkHi ' J 



ISSUE 22 • Typing Evaluator • 

Math Attack • Micro-Puzzler 

• Air Attack • Mathman • 

The Reading Program 




ISSUE 23 • Fire Bug • Minicomp 

• Dark Horse • Climber • 

P/M Creator/Animator 




BOFFO! 

Unlcheck 

Bopolron! 

Race in Space 

AtariCon Report 

Circuit DalabasQ 

Cassette Compressor 



ISSUE 24 • Circuit Database • 

Cassette Compressor • XL-DOS 

• Bopotron! • Race in Space 

• Unicheck 







ISSUE 25 • Weather Forecaster • 

Androlon • Miner Jack • BASIC 

Tutorial Part 1 • Adding 

BASIC Function Keys 




ISSUE 26 • BASIC Tutorial Part 2 • 

Robot Raid • Graphics Overlay 

• Popcorn • Magic Palette • 

PuLse in Action! 



^, . „jm 




ISSUE 27 • English Error Messages 
in BASIC •Instant Renumber • 
MicroCheck Part 1 • Advenlure 
at Vandenberg • Screenmaker 




ISSUE 28 • MicroCheck Part 2 • 
TwoGun • Cascade • Monthly 
Mortgage Calculator • Demon 
Birds • MicroDOS XL 




ISSUE 29 • RAtulCHECK • Revive 

Dragonlord • XL Expansion 

Connector • Cheep Talk 




ISSUE 30 • Loan Shark • Z-Plotter 

• BASIC Burger • ANALOG TCS 

Guide • Boulder Bombers 



COM FLUTING 

A_0 




ISSUE 31 • Unicheck • H.O.T.O. • 

Lunar Patrol • ATASCII Animation 

• Lazer Type • Atari Clock • 

Personal Planning Calendar 




IIIK.DOS!C»m*n*M> 



ISSUE 32 • Supereversion • DOS III 

to DOS 2 conversion • Color the 

Shapes • Home-made Translator 

• Cosmic Defender • 520ST 




ISSUE 33 • An Intro to MIDI • Note 

Master • Syntron • BASIC Bug 

Exterminator • Assemble Some 

Sound • C.COM • Mince (ST) 



All back issues $4.00 each 



Send check or money order to: 
ANALOG Computing Back Issues 
P.O. Box 615, Holmes, PA 19043 



MasterCard and VISA orders call: 

1-800-345-8112 

In PA. 1-800-662-2444 




A WORD PROCESSING PROGRAM ! 
AN INFORM A TION MAN A GEMENT PROGRAM ! 

^ A TELECOMMUNICATIONS program: 



% 



ALL THREE PROGRAMS, ON ONE DISKETTE!, FOR ONLY $49.95*1 

"Quite simply the best! The highest rating possible. . . the package should be part of every 
(computer) library."— analog computing 

"Russ Wetmore has done an EXCELLENT job! The program is flexible, powerful and 
very easy to use. $49.95 buys a heck of a lot of program."— review by arthur leyenbercer 

"Performance: if * • ir(Excellent)Value:ir • * ir (Excellent) 
This three-in-one package is a bargain . \ . one of the finest values on the market. " 



FAMILY COMPUTING 



HOMETEXT word processor. 

HOMEFIND INPrTIMATION MANAGER. 

HOMETEFIM -- — - - 



INICATIONS 



Together they are HomeKIc^ t ie uin^i. , ■ ? 
important and most useful horn-' computu- 
tions in one integrated system — on one dis 
The reviewers are unanimous: any one of 

these programs alone is well worth the price. 

So you're getting three times the computing power, 
with this exceptionally easy to use package: | 

• all commands in simple English; no complex 
computer jargon, no obscure instructions 

• all key commands are immediately available on 
the screen menu; additional commands can be 
called up for the more experienced user 

• to help you, system status Is displayed right 
on the screen 

And it's easy to use the three programs together. For 



stored in HOMEFIND and print letters and labels 
using HOMETEXT. Or, use HOMETEXT to write 
reports based on information you've called up 
via HOMETERM. 







HoiTieTexf* 

^"=^"9 program. 



3in1 

Sofhvare System 




mm 

1984! 







30 Mural Street 
Richmond Hill, Ontario 
L4B IBS CANADA 
I416)B81-9941 
Telex: 06-21-8290 



BATTERIES '^ INCLUDED 



T7875 Sl<y Park North, Suite P 
.._, _ . _ _ In/ing, California 

' 'The Energized Software Company!" usa927u 

■ I4WI 881-9816 

m WRITE TO US FOR FULL COLOUR CATALOGUE of our products for COMMODORE, ATARI, APPLE and IBM SYSTEMS Tfe/ex: 509-739 

FOR TECHNICALSUPPORT OR PRODUCT INFORMATION PLEASE PHONE (416)881-9816 
•MANUFACTURERS SUGGESTED U.S. LIST PRICE 
^Qfl''^"LYTr\^f!«"'Jl^fL'cS"'?.^=".f '°'''' "^"""^ ^'""" ^^ '"°=*«'"5' P""'«'-s ^"0 =='"5 to utilize specific features of HOMEPAK. See your dealer for details 

1985 BATTERIES INCLUDED, APPLE. ATARI. COMMODORE AND IBM ARE REGISTEREDTRADEMAHKS RESPECTIVELY OF APPLE COMPUTERS INC.. ATARI INC. COMMODORE 

BUSINESS MACHINES INC.. AND IBM BUSINESS MACHINES INC, 



